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APL is a powerful and elegant computer language, yet it is easy to learn. It is 
ideal for the engineer, scientist, mathematician, circuit designer, or for the per- 
son who just wants to learn a new language. 

Due to the absence of the special character set for APL on the TRS-80*, APL 80 
uses shifted letters, which are identified on the screen with a lighted graphics 
block before the letter. If you have a modified TRS-80 {Electric Pencil 
Modification), a lower case driver is included to display the shifted letters on 
the screen. 

Special features of APL 80 include the ability to save and load workspace on 
disk, return to DOS for directory or commands without losing your workspace 
or variables, and send output to a line printer. Four workspaces are included 
with lessons on the use of APL operators, commands, and functions, with many 
examples. 

Al I of this plus instruction manual and the book APL: An Interactive Approach, 
for only $49.95 plus $1.00 shipping. 32K, 1 disk required; 48K recommeded. 

Reduced featured, 16K Level II tape version, no lessons, no book, I/O capacity, 
$14.95; with book, $39.95 plus $1.00 shipping. 

APL An Interactive Approach, Separately, $15.50 plus $1.00 shipping. 
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ADVENTURE 



Get the granddaddy of the Adventure Games! 

From MicroSoft, the people who wrote 
BASIC for all the personal computers, comes a 
version of the original Adventure. NOW, you 
no longer need a PDP- 10 for all the power of the 
original game! 

This game fills an entire diskette. Endless 
variety and challenge as you seek to rise to the 
level of Grand Master (until you gain skill, there 
are whole areas of the cave that you cannot 
enter.) 

Requires 32K One Disk ONLY $29.95! 
TgCaf The Software Exchange 



PRDGSQ 



STAFF 

Publisher 

Roger W. Robitaille, Sr. 

Business Manager 

Elizabeth J. Robitaille 

Managing Editor 

George W. Blank 

Editor 

Lance Micklus 
Software Editor 
James Garon 

Timesharing Editor 

Richard Taylor 

Production 

Alison Willis 

Subscriptions Manager 

Diana Bishop 

Customer Service 

Bette Keenan 

Copy Editor 

Freida Day 

Accounting 

Rita Ellis 




PROG/BO Is published bimonthly by SoftSlde 
Publications, Milford, New Hampshire. Tele- 
phone (603) 673-5144. Subscriplion rales: USA 
regular bulk rate - $15 per year. USA first class, 
Canada, Mexico, AP0/FPO, overseas surface 
mail -$21 per year. Overseas airmail - $27 per 
year. Make ail remittances payable In US funds. 
Mali Subscription inquiries to PROG/80 Sub- 
scriptions Manager, PO Box 68, Milford, NH 
O3055. 

©SoftSlde Publications 1979 
All Rights Reserved. 



PLEASE NOTE: 

Our new WATS line 
number is: 

1-800-258-1790 

It is ONLY to be used for 
ordering software. 

Programmers will not be 
available on this line. 

The WATS line will be 
open from: 

8:00 a.m. to 6:00 p.m.* 



ALSO... 

During normal business 
hours, programmers will 
ONLY be available from: 

9-10 a.m. and 5-6 p.m.* 

673-5144 



New HOTLINE Hours: 

Tuesday Nights 
7-10 p.m.* 

673-5144 



Your Cooperation Will Be 
Most Appreciated 



'Eastern Standard Time 
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by Lance Micklus 







By now, most of you have seen 
the most awaited movie of the 
decade, just gone by — Star Trek / 
The Motion Picture. And, if you're 
really into science fiction, you've 
also seen Black Hole. Plenty has 
been written elsewhere about the 
merits of each of these films. So, I 
won't bother to give you an evalua- 
tion here. Rather, I would like to 
contrast them with other films, as 
far back as the 1950's, to point out 
some interesting things. 

Generally, science fiction has 
always reflected the average per- 
son's view of technology and the 
type of future that will result from 
the existence of that technology. 

In the 1950's, the technology of 
the atom bomb was foremost on the 
mind of the average person. In 
many science fictions films, we saw 
plots based on events that might 
happen as a result of the bomb. 
Typically, this was in the form of 
giant creatures, like ants and 
spiders. They were so close to the 
absolute truth. Weren't they really 
trying to point out that nuclear 
technology could severely damage 
to the environment? 



Other science fiction movies turn- 
ed their attention toward invaders 
from outer space. These movies 
were the other side of the coin. Can 
all of our weapons, including the 
A-bomb and H-bomb, really defend 
us from all perils? 

Noticeably missing were stories 
about computers. That's odd in a 
way, because computers existed 
right after World War II. 

The first mention I ever remember 
of a computer was on the Superman 
TV show. This thing, called a think- 
ing machine, told the crooks at ex- 
actly what time to make their 
getaway after robbing a bank, so all 
of the traffic lights would be green. I 
remember asking my mother, later, 
if such machines really existed. This 
thinking machine, with blinking 75 
watt light bulbs and a belt driven 
CPU, did make an interesting state- 
ment. It said that a machine could 
solve a problem too complicated for 
humans (in this case, figuring out 
the perfect travel route which 
avoids all red lights). 

Computers really didn't show up 
much until the 1960's. The space 
program made us very aware of the 



technology.including computers 
which were able to solve the com- 
plicated problems of space travel. 

Most science fiction from that 
period came from TV shows such as 
Lost In Space and Star Trek. Both 
shows had space ships which used 
computers for navigational aids. 

The extremely rapid advances in 
computer technology raised some 
new questions by the end of the 
1960's. Specifically, could com- 
puters become smarter than the 
people who had made them? In the 
movies 2001 and Colossus — The 
Forbin Project, they did. And 
because of the powers given to 
them, they became gods; for they 
had, and used, the power of life and 
death. This fear wasn't totally un- 
founded. After all, by the Iate1960's 
computers were computing and 



printing our pay checks and sending 
us our bills. 

Now, we come to the end of the 
1970's. For the first time we have 
micro-computers. Not only do they 
do what computers do, they can 
hear (Voxbox), speak (Voice Syn- 
thesizer), see (slow scan television), 
and even move (The Turtle). But 
where are they in today's science 
fiction films? 

Some of their names are 
household words - R2D2, C3PO (Star 
Wars), and Vincent (Black Hole). 
They are the micro-computers of the 
future. And you know what else I 
think? Their great, great, great 
grandpa was the Radio Shack 
TRS-80. 
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€ (All* AJexander dTtTwas conquer "the world. Your goal (s the 
Universe! But, there's a lot more to building an empire than 
firing a cannon. In this magnificent simulation, you let your 
armies fight the battles, while you decide where and when to 

fight, plan the use of your resources, build warships and 

^transports, set tax levels, dispatch intelligence missions, arid 

draft armies. The best grand strategy game for the TRS-80! 

16K Cassette — $14.95 
JbeSahtmate 
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CROSS REFERENCE 
UTILITIES 



from 
Lance Micklus 



}. 



• BASIC Cross Reference J 
XREF'RX (*REX>RENUMX 1 



Displays all line number references and variables in 
a Level II or Disk Basic Program. Four options are 
available: display all line references and variables, 
line numbers only, variables only, or print all 
references to a single line number or variable. 

Versions available: 

RX (Disk Version) 32K,1 Disk Systems, on Disk 
$24.95 

XREF (Level II Version) Level II.16K, 

on cassette $19.95 

RENUMX (XREF with renumber and rescue 

after reset) 

Level II, 16K,on cassette $24.95 

RENUMBER (separately) $7.95 

TO ORDER: 
CALL TOLL-FREE 
1-800-258-1790 

9AM - 9PM, EST 

The Software Exchange 

6 SoothStreef,6ox 68,M%ord,NH 03055 (€3-673-5144 




TIME SHARING SECTION 



The next few pages are the beginning of a 
regular timesharing column in PROG/80. We are 
delighted to introduce our new timesharing 
editor, Richard Taylor. Mr. Taylor, an operatic 
singer with the New York City Opera, is also the 
leader of the TRS-80 User's group on The Source 
and the author of TRS-80 Opera Theatre, the 
finest musical program available for the Radio 
Shack computer. In this first issue, we present his 
reviews of The Source, Micronet, and the pro- 
grams he uses for timesharing. 





TRS-80 Opera Theatre 



The finest musical program we haVe seen for the TRS-80S 
It deserves a quality amplifier. Amazing sound! Richard 
Taylor is an opera singer with a magnificent ear! 

Selections: 

• William Tell Overture •Musetta's Waltz 

• Sempre Libera » \ #Queen of the Night 

• La Donrla E' Mobile 



TO ORDER: 

OACU toll-free 
1J0O-258-179O 

8AM • 9PM. EST 




HALLENGE 



16K Cassette $ 9.95 Each Program 
32K 1 Disk S29.95 Both Programs 



, Word guessing gime with sound effects, one or two 
players. Truly challenging and competitive. "■■■ f 

TheSoHwate Exchange 

6 SouthStreet,Box68,Milford,NH 03055 603-673-5144 



MAY THE 
SOURCE BE 
WITH YOU. 
.. OR WILL 
IT BE 
MICRONET? 

by Richard Taylor and 
Mark Kirmayer 

"A traderajfl of Ltnct Midfltt*, Inc. 

If you arc thinking of purchasing 
a MODEM or if you own one 
already, you undoubtedly have 
been reading the ads for 
MICRONET and THE SOURCE. 
They are offering us "Micros" a 
chance to timeshare on one of the 
"Big Guys". So the question is: Do 
you need THE SOURCE or do you 
need MICRONET? I have used both 
and perhaps what I have learned 
will be able to help you answer that 
question. 

If THE SOURCE'S one-time fee of 
$100 to open your account seems 
excessive (as it did at first to me), 
you may be interested to know that 
it is clear to me, after just a few 
weeks on THE SOURCE that the dif- 
ference in the hourly rate {$2.75 vs 
$5.00) and the greater abundance of 
local phone numbers, makes THE 
SOURCE'S price the better buy in 
the not too long run. And if you've 
already calculated the differences 



and are wondering how I was able to 
use forty hours so quickly, take this 
as a testament to the many ex- 
cellent features on the system. Ac- 
cessing the different data bases, sen- 
ding 'electronic mail' to subscribers 
across the country and receiving 
your 'mail' when you log-on, and 
'chatting' directly with fascinating 
people from coast to coast, (just a 
few of the possibilities which will be 
explored later) are but a few of the 
addictive and rewarding features of 
the system, and at $2.75 an hour it is 
indeed a bargain. 

MICRONET lists only 25 phone 
numbers for the entire U.S., and on- 
ly if one of these is in your local call- 
ing area can you avail yourself of 
MICRONET at the published pripe 
of $5.00 an hour. If you do not hap- 
pen to live in one of those 22 cities 
you have two options. You may call 
the nearest long distance number or 
use the TYMNET Telephone Net- 
work (about 200 locations) to access 
MICRONET. Using TYMNET will 
add $4 an hour to your charge. (The 
SOURCE includes both TYMNET 
and TELENET at no extra charge). I 
live in a highly-populated region of 
the New York Metropolitan area, 
and while THE SOURCE had a 
number within my local calling 
area, MICRONET did not. I was able 
to find a local number which re- . 
quired the use of TYMNET {for a 
$4/ hour surcharge), and a com- 
parison of the toll-charges versus 
the surcharge proved that it was less 
expensive to call out of my area, but 
still the cheapest way 1 could use 
the MtCRONET system was at a cost 
of $8.06 an hour, versus the advertis- 
ed $5. 

One thing is immediately ob- 
vious: time sharing on one of these 
systems is to the idea of personal 
computing what the jet engine was 

to air travel. Both inventions open 
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up new. and untold worlds of ex- 
ploration, learning, and just plain 

having a good time. 

Each system has a slightly dif- 
ferent log-on procedure, but both 
systems have an update feature to 
!^i you know what has been added 
to the system since you last used it. 
As a first-time user you will find 
yourself going through file after file 
of information that you will need to 
know to use the system effectively. 
The SOURCE'S file of system com- 
mand and other function updates, 
takes 55 minutes to print out. This 
can be done in installments. 

For just this purpose, and for 
reasons to follow, a printer is an in- 
valuable tool for the timesharer, for 
at the very least, it leaves you with 

permanent hardcopy when you sign 
off. Perhaps mote important is a 
good terminal program. 1 use 
ST80D, which allows me to open a 
memory buffer and save out to disk 
any amount of information I want. 
The ideal setup would include a 
"Smart" terminal program and a 
fast printer. 

For those not owning a copy of a 
terminal program which allows for 
the transferring of disk files. 

MICRONET downloads free of 
charge to its subscribers its own ter- 
minal program (MICRONET EX- 
ECUTIVE), which some people use 
to access THE SOURCE. And in the 
discussion of MICRONET's features, 
it became clear again why a printer 
enhances the value of the systems 
to you. 

While THE SOURCE'S best 
feature (and it is a great one at that) 
is the ability to access different data 
bases, such as the New York Times 
Consumer Data Base, the transmis- 
sions of U.P.I-, lectures on Astrology 



and ESP. and impressively, the abili- 
ty to book confirmed airline, hotel 
and car-rental reservations, 
MICRONET's strength lies in 
another area altogether. Through 
MICRONET you can purchase soft- 
ware for the TRS-80. The system will 
sell you the programs you desire, 
and while they charge you the price 
of the program, they do not. in a 
sense of fair play, charge you for the 
transmission time. Thus you get soft- 
ware sent right to your terminal, 
with no-fuss shopping, no wait for 
the mails, and no extra service 
charge. MICRONET will also 
download entire manuals to your 
terminal, should you so desire, 
quoting before you begin the "con- 
nect time charges" for the transmis- 
sion, versus the cost of having the 
manuals or documentation mailed 
to you. 

To get into a discussion of each of 
the different services offered on 
each system would take no end of 
time, for while MICRONET, for ex- 
ample, sells TRS-80 software to you, 
THE SOURCE sells just about 
anything else to you, through an 
electronic shop-at-home feature, of- 
fering excellent prices on cameras, 
stereos, etc. From your terminal you 
make your purchases, which is 
charged to a major credit card, and 
then sent to you. 

It should be obvious by now that 
with either system you will spend 
many hours at your terminal. 
Response times vary according to 
the time of day. I have had waits of 
6 minutes of THE SOURCE at 6:15 
PM, and instant response at 1 AM. I 
have also been disconnected in the 
middle of entering files, and I had 
one instance each where both 
systems were too busy to accept my 
log-on. System crashes do occur and 
in my few weeks of experience, both 
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systems have gone "down" for 
several hours. THE SOURCE has a 

toll-free number for complaints, and 
you do get results. 

Both systems offer a number of 

similar features, such as games, 

like 'Adventure', 'Startrek', and 

and both systems offer a large 

more, 

selection of programming 
languages. The Source also offers 
(or will be offering) business pro- 
grams, (General Ledger, Accounts 
Receivable, etc.), and educational 
programs, from grade school level 
up to and including the Dartmouth 
College library of courses to take 
right at your own terminal. 

One iast feature, which is 
available on THE SOURCE, is an 

elaborate MAIL system. Subscribers 
are asked to list themselves and 
their interests in the USER DIREC- 
TORY, so that other users can find 
and communicate with them. I 
wound up forming a TRS-80 users 
group through THE SOURCE'S elec- 
tronic 'mail'. Using a simple com- 
mand (DISEARCH) I was able to get 
a list of all users who included 
TRS-80 as an interest. I took these 
different account numbers and 
entered them into a file called 
"Group". Then, using the command 
MAIL (CROUP), I was able to write 
the invitation only once and have it 
sent automatically to everyone 
listed in the file GROUP. We have a 
constant exchange of information, 
and it has been possible to send en- 
tire BASIC programs through the 
'mail' to the group. The abilities of 
this system are astounding and 
would take too long to describe. 
Trust me, it's addictive. 

Chatting on THE SOURCE is just 
that. Any two users can "chat" 
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directly while on the system, the im- 
portant point being that this cross- 
country "chatting" and the ex- 
change of huge amounts of data via 
the "Mail System" is at the rate of 
$2.75 an hour, cheaper than the 
rates of the phone company, and 
not only does MICRON ET have 
nothing to match this feature, if it 
did it would be at a rate of at least 
SS.OOanhour. 

It undoubtedly seems that I have 
a strong preference for THE 
SOURCE, something I didn't realize 
myself until I undertook to write this 
comparison. I pondered for a while 
that it might be that I like THE 
SOURCE more because I have spent 
more time on it, which I must admit. 
However, I think the reason I've 
spent more time on it is the many 
features it has which MICRONET 
does not (at least at present). 

As a subscriber to both systems, I 
think if I were forced at solder- 
gunpoint to suggest one or the other 
it wouid be THE SOURCE. But, if 
the one time charge of $100.00 
makes you hesitant, then by all 
means send in your $9.00 to 
MICRONET, and start timesharing. 
You pay only for the time you use, 
and I'm willing to bet that once you 
step up to such a system, you'll 
become involved to the point where 
you see your way clear to subscribe 
to THE SOURCE also. Bear in mind 
that both companies are constantly 
adding features and improving the 
features already there. 

One piece of advice though, 
needs no qualification whatsoever - 
TIME SHARE 1 1 (I don't think you'll 
disagree with me, but bear in mind 
that if it turns out that you do, we 
can battle it out some evening on a 
one-to-one basis, in the wonderful 
world of timesharing.) 



1 time fee to 
open account 
hourly charge 



disk storage 
Data bases 



Min. monthly 

charge 

Local phone #? 



THE SOURCE 

$100.00 

2.75 (6PM to 7AM 
+ weekends) 
15.00 (other times) 

3.3 cents a day 
per 2048 char 

Many and varied 
(UPI, TRAVEL, NY 
TIMES) 



5.00 

Very good chance 



MICRONET 

$9.00 

5.00 (6PM to 5AM) 
+ weekends) 
(not available) 

64K FREE 

NO DATA BASES 



1.00 

WATCH OUT!! 



-ST80D + ELECTRIC PENCIL + 
VTOS 3.0 

By Richard Taylor 



l think ST80D is the best single ter- 
minal program available for the 
TRS-80. If you have this program, 
and you have VTOS 3.0 and the 
ELCTRIC PENCIL, you can combine 
them to make a very powerful com- 
munications package. 

All by itself, ST80D lets you control 
the opening and closing of a 
'memory buffer' for the saving or 
sending of data. ST80D also lets you 
control your printer, zero your- 
system clock, on/off auto line feeds, 
reset your RS232 switches, send 
lower case, display lowercase, send 
out an auto logon message, define 
10 programmable keys, and more! 

With the addition of ELECTRIC PEN- 
CIL you can write messages at your 
leisure and load them into ST80D 
when you're ready to transmit them. 
PENCIL saves its data in ASCII for- 
mat and is perfectly compatible 
with ST80D. Just be sure they are 



both on the same vintage DOS. 
Sorry but NEWDOS will not work. 
(Ed, note: ST80D version 1.4 will 
work with NEWDOS.) 

If PENCIL creates files usable with 
ST80D then it would seem that 
ST80D must create files readable by 
PENCIL. But no. It seems PENCIL is 
a little more fussy about what it 
loads than is ST80D. PENCIL will not 
read in the files created by ST80D 
even if you give them the extension 
/PCL. Lance Micklus has given us 
NUMBER/BAS which reads in ST80D 
files and puts line numbers on them 
so that we can edit out any mistakes 
or garbage that might have crept in 
before we closed that memory buf- 
fer. 

Alas, NUMBER/BAS takes quite a bit 
of time to use and needs a lot of 
room, and if the program or data 
line exceeds about 240 bytes the 
whole thing will crash. There is an 
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easier way, a much easier way, 
which has turned my use of the 
ST80D memory buffer into a cons- 
tant occurrence. 

Many of you have a copy of VTOS 
3.0 even though you may not use it. 
Here's your chance to justify that 
$39 or $49 purchase. Using XFER (if 
you have one drive) put Electric Pen- 
cil on your 3.0. Then type PATCH 
PENCIL PENCIL. 3.0 will tell you 
what it is doing in its semi-obscure 
fashion and you will be left with a 
Patched version of ELECTRIC PEN- 
CIL. This is a one time operation 
which you don't have to repeat. 
Now type XFER ST80D/CMD (or 
COPY if you have 2 drives) and get 
ST80D on your 3.0 disk. You are now 
ready. When you call for a directory 
in PENCIL it will give you a com- 
plete directory of the disk, not just 
PENCIL files. Anything saved in 
ASCII can now be read in PENCIL. 
Try those documentation files on 
3.0. See, they were PENCIL Files! 

Note that if you are using lowercase 
PENCIL your Control Key will not 
function. Use Shift Down Arrow in- 
stead. 

Now create a file with ST80D from 
your memory buffer by, for exam- 
ple, calling up your local FORUM 80 
and letting those messages pour into 
your buffer. When you save the file 
be sure to give it an extension!! PEN- 
CIL files need extensions or PENCIL 
will look for a /PCL extension. I use 
SOR for THE SOURCE and FOR for 
FORUM 80 etc. This is surely the 
best of all possible worlds for us 
MODEM people. The only problem 
I have ever had occurred with a 
BASIC program that had a lot of 
"string packing". The transmission 
was fine but it would not load into 
anything. No answer yet for this pro- 
blem. 
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by 
Oavid Bohlke 



TYCOON 



Take the helm of a small 
manufacturing business - set 
pay standards, advertising 
budgets, etc. Your progress is 
well-charted. 

This game can accommodate up 
to four would-be financial 
wizards... last one to make 
$10,000,000 becomes the jani- 
tor! 

The Software Exchange 




Levei ll, i6K 

Price, $7.95 
TO ORDER: 
CALL TOLL-FREE 
1-800-258-1790 9am-9pm.esi 



FLASH*FLASH * FLASH*FLASH *FLASH*FLASH 
NEW RELEASE! NEW RELEASE! NEW RELEASE! 



VTOS 3.1 

by Randy Cook 



VW*% Now you can buy the most powerful Disk 

)TJPW Operating System available for the TRS-80- 
* " microcomputer! 

You read about the power of devices in December Prog-80! You 
just read about VTOS with Electric Pencil and ST80! Now you can 
be one of the first people in the country to own the latest version 
of the DOS that Lance Micklus and Richard Taylor like so much. 

Directory from BASIC, chaining, devices, user defined keys 
(128 more possible keeping the ones you already have!), patch, 
link, upper/lower case driver and much, much more! 

VTOS 3.1 Disk Operating System on diskette $49.95 . . .com- 
prehensive system manual $29.95 + $2.50 shipping. Special 
VTOS 3.1 and manual $75 + $2.50 shipping. 

Enhanced BASIC as well! Includes open "E", corrects other 
problems. VTOS 3.1, BASIC, and manual $99 + $2.50 shipping. 



'TRS-80 is a trademark of Radio Shack and Tandy Corporation. 



TheSattware Exchange 

6 SouthStreet,Box68,Milford,NH 03055 603-673-5144 
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What do you do when you finish reading 
TRS-80 Assembly Language Programming 
by Bill Barden . . . 

and you want to do some serious machine 
language or assembly language programming? 

Buy the 

Z80 Software 



it Guide & Cookbook 



Utility Routines • Stack Operations • 
Searches and Sorts • Floating Point 
Routines • Z-80 Instruction Set 

The index lists over 100 assembly language 
routines and subroutines that you can use! 
$14.95 plus $1.00 shipping 



MORE BOOKS FROM 



New from 

SCELBI 

Publications 




IheSohware Exchange 

6<ajlhMim.Bo%l>B.MIttMl,NHCaXr, OU-673-Sm 



TRS-80 DISK AND 
OTHER MYSTERIES 

by Harvard C. Pennington 
If you are serious enough about disk pro- 
gramming to own RSM-2Dor NEWDOS + , 
then you ought to purchase this book. It 
explains the organization and features of 
TRS-DOS 2.0, 2.1, 2.2, NEWDOS, and 
VTOS, tells you how to use Superzap, 
RSM-2D, Monitor 3, Debug, Dircheck, and 
LMOffset, explains the directory track on 
the disk, file structures {including Electric 
Pencil files), and even gives detailed pro- 
cedures for recovery of lost data. While 
this book is not recommended for the in- 
experienced user, it is essential for the 
serious disk programmer. The book is ex- 
pensive, in 8 Va by 1 1 format with typewrit- 
ten instead of typeset printing, and only 
130 pages, yet the information is worth 
the price. $19.95 

plus S1.00 shipping and handling. 

LITTLE BOOK OF 
BASIC STYLE 

John M. Nevlson 

Ideal reference for BASIC programmer, 

junior hlflh lo research scientist. Indexed, 

Illustrated, 151 pages. 

$5.95 plus $1.00 shipping and handling 



TRS-80 ASSEMBLY 

LANGUAGE 

PROGRAMMING 

William Barden, Jr. 

Covers Z-80, an Introduction to Assembly 
Language, the Radio Shack Shack Editor/ 
Assembler and T-Bug, and debugging 
methods; also explains how to move 
data, the use of arithmetic, compare, 
logic, and bit operations, shifts, strings, 
tables, input and output, and 12 common- 
ly used subroutines. Well indexed and Il- 
lustrated. 

$3.95 plus $1.00 shipping and handling 



TRS-80 INTERFACING 

by Jonathan A. Titus. 
This valuable reference book for the hard- 
ware enthusiast with an understanding of 
Assembly language programming in- 
cludes the schematic, printed circuit 
board artwork, and instructions for 
building a TRS-80 breadboard, plus 18 ex- 
periments to give a solid understanding 
of interfacing to the TRS-80. $8.95 

plus $1.00 for shipping and handling 
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Lifeboat Associates, specialists In microcomputer disk software, Is proud 
to offer the first professional disk-based language and utility package for 
the Badlo Shack TBS-80 computer. Written by Microsoft, creators of Level 
II BASIC, the package runs on a TBS-80 system with 32K RAM, one of more 
drives and TRSDOS. The software Is supplied on diskettes and consists of: 

FORTRAN a true relocatable machine code compiler for 
ANSI FORTRAN X3.9 (except COMPLEX variables). 
MACRO ASSEMBLER a disk-based macro assembler 
utilizing Zilog mnemonics and producing relocatable 
code. 

LINKING LOADER a link-edit and load FORTRAN and 
assembler modules for execution. 
SUBROUTINE LIBRARY a complete library of 
subroutines existing as relocatable linkable modules for 
FORTRAN or assembler programs - e.g., double preci- 
sion, square root, natural log, transcendentais, etc. 
DISK TEXT EDITOR to create and modify FORTRAN and 
assembler programs as disk files: also can be used as a 
general purpose text editor for correspondence and 
other documents. 

TRf-80 FORTRM 

This high-powered 

professional software 

package with full 

documentation 
Is available at the 

DISCOUNT PfUCEOF $1 50. 
PER COMPUTER SYSTEM 



SOFTUKIRC 
PfKKMCS 



The Macro Assembler, Loader, Editor, and Cross 
Reference Utilities alone $80. 

The Fortran Compiler, Loader, Editor, and extensive 
library of scientific functions alone JftQ 

^s . Plus $5.00 shipping — 

/jffMK^g (separately $2.50 each) 

■sys 

The Software Exchange 

6 ScuthStree(,8ox 68,Mifore/,NH 03055 603-673-5(44 

* TBS-80 is a registered trademark of Radio Shack and Tandy Corporation. 
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INPUT. 



A COLUMN OF YOUR LETTERS 



Gentlemen, 

As an addendum to Lance Micklus' 

article "DOS" in your Sept. issue 

where he describes a method of 

speeding up access time to the disk 

drive by poking changes into Ram; 

permanent changes can be effected 

by modifying the DOS itself as 

follows: 

Using the Newdos 4- program, 

"Superzap", make these changes in 

SysO: 

NEWDOS Track Sector 7 

Change relative 

byte OF from OB to 

02 

Track Sector 9 

Change relative 

byte OF from 1B to 

12 

TRSOOS Track Sector 7 

2.2 Change relative 

byte 52 from 1F to 12 

Change relative 

byte C5 from OB to 

02. 

These changes speed access time to 
20 millesecond and my Radio Shack 
drives work perfectly. For those who 
have Pertec drives and want to try a 
10 millisecond access time (my 
drives won't function at that speed), 
use 01 and 11 respectively in place 
of 02 and 1 2 in the above changes. 

Sincerely yours, 
N.W. Duncan 
Stone Mountain, GA. 
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Editor: 

In his software review "Blaiseing 
along in Pascal", Robert P. Johnson 
says that CI E has left off of People's 
Pascal II the big compilers that 
should be on side two, and instead 
given a second copy of the small 
compiler. 

Not so. We have left nothing out. 
We have combined what was sup- 
posed to have been side one and 
two on one side, and given a backup 
copy on the other. Five pro- 
grams/five programs, instead of 
three/two. 

I'm going to have to examine our 
promotion, because while we do 
supply 16 and 32K compilers, we do 
not have 48K People's Pascal. UCSD 
does! 

While I must take exception to the 
"missing side", I wish to thank 
PROG/80 for presenting an impor- 
tant review fairly, and in an in- 
teresting way. 

Thanks ever so much, . 

Bill McLaughlin 

Computer Information Exchange 

San Luis Rey, CA. 



The Best 

Has Gotten Better! 

Sargon, the program that came in 
first in the Creative Computing 
Microcomputer Chess Tourna- 
ment, has become Sargon II - ftOQ 95 

•A vastly improved game 

• Faster response time 
•New level for beginners 

• Easier to pre-set board 

•Hint mode - What does the computer suggest 

Sargon II is the program that took 
on the maxi-computers in the West 
Coast tournament, and finished in 
the money! More thinking power 
than you ever expected in a TRS-80. 



Now in stock for immediate delivery! 





TO ORDER: 
CALL TOLL-FREE 
1-800-258-1790 

9AM - 9PM, EST 



The Software Exchange 

6 SailhStreet,Box68,Miliord,NH 03055 603-673-5144 
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TIRED OF DISK ERRORS? 



STOP BLAMING YOUR DRIVES - 
FIX YOUR DOS! 

NEWDOS, by Apparat, is the third generation disk operating 
system for your T RS-80. NEWDOS corrects over 70 errors and 
omissions in TRSDOS 2.1 and disk BASIC, yet the two are 
completely compatible! Programs and files saved under one can 
be used with the other interchangeably. Going from TRSDOS 
to NEWDOS is like going from Level I to Level II: more 
power, more convenience, greater speed. 

NEWDOS NEWDOS+ 



1 Use all DOS commands 
(incl. directory) in BASIC 
Automatically load and run 
a BASIC program 
on power-up 

Produce variable cross- 
reference tables 

Open 'E' to add to 
sequential files 

Append files 

Use your line printer as 

a screen printer 

Renumber BASIC programs 
End keyboard bounce 



Editor/ Assembler for disk • 
Disassembler • 
(Z80 machine code) 
LM Off set -allows transfer of any • 
system tape to a disk file 
(automatically relocated) 
BASIC1- Level one BASIC • 
saved on disk 
LV1DSKSL - not a typo, this • 
saves and loads BASIC1 
programs to disk 
DIRCHECK-tests and lists • 
disk directory 
SUPERZAP-display/print/modify . 
any location in memory or on disk 



And, best of all, say goodbye to system crashes, lost data and 
wasted time caused by your old, bug-ridden system software. 

Apparat's NEWDOS is fully documented and available for 
only $49.95. NEWDOS + , Just $99.95 

Use of this software may require documentation 
available only with the purchase of Radio Shack TRSDOS 
and/ or the Radio Shack Editor/ Assembler . 



Ihe Software Exchange 

h SouthOi/wt, fiox 66,M)W. NH (Mft»5 Art ) - f&3 ■ S144 




.AREYOUR 

Programs 

WMTE* 
MOTTEOTED'? 




by Frederick B. Hagar 

You've just completed a tedious 
week of writing the ultimate game 
on your TRS-80 and now it's time for 
the big test. The wife has been trying 
to make the couple next door more 
receptive with coffee and home 
made doughnuts. Now you've filled 
your 16K with the latest amusement 
or entertainment. The moment of 
truth arrives and the computer 
displays: 
Level of Difficulty — Please enter 
1, 2, 3, or 4 

After a victorious first game, your 
neighbor, looking for a little harder 
version, presses 4 (ENTER). 

OOPS — how do you tell him that the 
program wasn't ready to play again 
and that he's just deleted line 
number 4? You can load from tape 
or disk again (and admit that the 
TRS-80 actually possesses human 
frail ities), or you could have write- 
protected your program. The pro- 
cedure is very simple, requiring only 
the addition of two lines. 
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To help you understand how to 
write-protect any program, you 
should know that the TRS-80 stores 
a line number as two bytes, the low 
order byte followed by the high 
order byte of the line number. For 
example the line number 1 is stored 
as (01) (00). If you poke 255 (FF HEX) 
into the high order byte and list the 
program, you'll find a new first line 
number; 65281. You'll also find that 
it's impossible to delete, edit, or list 
individual lines by the conventional 
method. This is because the TRS-80 
reads line 65281 and expects the 
next line number to be the larger. As 
there are no larger line numbers, all 



lower numbered lines are now 
treated as sub — statements, 
separated by colons. 

The only problem created here 
stems from the fact that the TRS-80 
will not branch to a colon. For this 
reason, GOTO, GOSU8, and THEN 
statements will not execute without 
one more change, lust before the 
first branch statement of your pro- 
gram, poke the high order byte of 
the first line number with 0. This will 
unlock the program and allow ex- 
ecution of all branch statements. 
Write protection should be reac- 
tivated after the last branch state- 
ment. 



REM THIS LINE • WILL BE 65281 AFTER FIRST RUN 
POKE 27175*0 I REM UNLOCKS PROGRAM ** 

THIS " 

IS 
YOUR 
PROGRAM 

POKE 27 1 75 t 253 J REM THIS LINE LOCKS THE PROGRAM 



If you have a disk system you can 
debug to locate line number one. 
But, if you haven't added your disk 
yet, the following program will 
locate the high order byte of your 
first line number. 



1 
2 
3 

5 
6 
/ 
B 
9 
10 END 

The addresses of your first line 
number will vary according to 
memory size, whether or not you 
have a disk, what DOS you're using, 
etc. 



.16 A** "HELLO" tCLS 

20 L == P EE K < V A RPT R ( A* ) + 1 ) ! M = PEEK < V A R P TR < A$ ) +2 > 

30 X ( 1 ) -FIX < M/l 6 ) t X < 2 > «M- ( X ( 1 ) *1 6 ) 

40 X < 3 ) -FIX ( L/16 > } X < 4 > ~L~ ( X ( 3) *1 6 > 

50 X^<X<i>*-W96>-MX<2>*256> + <X<3>*lA) + <X<4>>-5 

60 PRINT X 



Delete the -5 in line 50 and this 
program will find any string in 
memory. I'm sure you can find other 



uses for this. 

So, have fun and happy computing! 
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Now Available 
SoftSide on Cassette 

1979 Back Issues $7.95 each 

(with magazine $9.95) 
JANUARY 
•Round the Horn 'Ten Pin Bowling 

•Comput-A-Sketch "Kiddy Slot 

FEBRUARY 

•Form 1040 'Concentration •Elements Quiz' 

MARCH 

•Tarot »Metric/English Converter 

APRIL 

•Safari "Rabbits and Foxes 'Personal Finance (Checkfinder) 
•Series Circuits »Don't It Make My Brown Eyes Blue 

MAY 

•Dog Star Adventure «Awari «Letter Crunch »Math 'Super Sub 

JULY 

•All Star Baseball »Yahtzee»Tank 'Spelling Bee •Collision 

JUNE 

•Atlantic Balloon Crossing 'German Word Quiz 'Nim 'Home 
Appliance Record System 'Entrapment 

AUGUST 

• Nuclear Reactor 'Storybook 'Cryptogram 'Shooting Gallery 
•Morse Code Tutor 

SEPTEMBER 

•Engineer "Treasure Dungeon "Hangman 'Pyramids 

OCTOBER 

•Aptitude Test 'Reaction Time 'Battleship 'Westward 1847 
•Tug-O-War 

NOVEMBER 

•Everest 'Isolate 'Energy Cost 'Picture Puzzles 'Doodle Pad 

DECEMBER 

•Oil Baron »Drag Race «Show andTell'Towers of Hanoi 'Slalom 




Tlte Software Exchange 

6 ScuthStreet, Box 68, Milford,NH 03055 603-673-5144 
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'S SNA NAME? 



by James Garon 




Microsoft, the authors of Level II Basic, have thoughtfully (or 
accidentally?) provided us with the word "NAME" — without having given it 
any meaning. We can give the word NAME any meaning we wish, and in so 
doing, we will be creating a second (Level II) or eleventh (DISK Basic) USR 
subroutine. 

As an illustration, let us teach the computer that NAME means: 
"Reverse all graphics on the screen, but leave all non- 
graphic information intact." 

First we write aNnachine-language program to do the job: 



HEX 


MNEMONIC 


COMMENTS 


D9 


EXX Save whatever BASIC was doing 


21 FF 3F LD HL.3FFI Pointer to last byte of screen 


06 3C 


LD B,3C Used to see if done 


7E 


LD A.(HLH 


Get byte from screen 


FE 80 


CP80 


Is it a graphics byte? 


38 04 




Jump if not 




2F 


CPL 


Change all bits 


F6 80 


OR 80 


Turn graphic bit back on 


77 


LD (HL),A 


Send reversed character back to screen 


2B 


DEC HL| 


Point to next screen location 


7C 


LD A,H 




B8 


CP B 


See if we're still on the screen 


30 F2 
D9 


i r? mp 


I* r „ ,.„„»; , 


J IX INV„ — — ^— || y\j t CUIILII IUC 

EXX Restore BASIC'S stuff 


C9 


RET 


Back to BASIC 



Keep in mind when writing your own routines, that all jumps must be 
relative, and no bytes of the routine may be zero (00). 

Next, we write a DATAstatement which will contain the decimal values of 
the 22 bytes of our routine: 

10 DATA 21 7,33,255,63,6,60,1 26,245,1 28,56,4,47,246,1 28,1 19,43,1 24, 
184,48,242,217,201 



24 



Then a "dummy" string to receive the bytes: 

20 A$ = "ANY 22 CHARACTERS////" 

And a routine to place the DATA bytes into A$: 

30l = VARPTR(A$):J = PEEK(l+1)+256*PEEK(l + 2) 
40FORK = JTOJ+21:READX:POKEK,X:NEXT 

Now we tell NAME where to find the routine in A$: 

50 POKE 16783,PEEK(I + 1):POKE 16784,PEEK(I + 2) 

Let's add a couple of lines to test our new NAME: 

60CLS:FORI = 1 TO 5 

70 PRINT@137 = I,CHR$(128)CHR$(140)CHR$(160)CHR$(144)CHR$(140K;HR$(128) 

CHR$(26)STRING$(6,24) 

CHR$(128)CHR$(143)STRINC$(2,140)CHR$(143)CHR$(128):NEXT 
80 FOR I =1 TO 200:NEXT:NAME:COTO 70 

Once the program is working, you may DELETE lines 10, 30, 40, 60, 70 
and 80. Now whenever this program is executed (lines 20 & 50), the 
word NAME will reverse all graphics. 



FOR YOUR ORDERING CONVENIENCE, TOLL-FREE 

1-800-258-1790 



19 AM to 9 PM EST — ORDERS ONI vl 



(603) 673-5144 

PROGRAMMERS ARE AVAILABLE ON: 

THE HOTLINE 

TUESDAYS, 7-10 PM, EST 
(603) 673-5144 



We will not be 
responsible for 
typographical 
errors. 



Prices subject to 
change without 
notice. 
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THE 

MEAN 

Checkers Machine 



by lance MicMus 



fEWF 



Novi supports 
f o r ced ju li ips. ' Previous 
purchased- If you want 
. forood j ump 



you can t r a d e 
•Id version for a $5 
'service fee. 



fHE SOFTWARE EXCHANGE 
i South Sfleet Milford, NH 03055 



Our resident wizard has done it again! Designed in FORTRAN, run 
as machine language, this program turns your TRS-80 into an 
unbelievably wicked checker player! Four levels of play; at the 
most difficult, the machine may take ten minutes per move, as it 
attempts to assess all possibilities. MEAN CHECKERS MACHINE 
is to checkers what SARGQN is to chess. (Level 4 is an exercise in 
humility!) 

Level II, 16K $19.95 

Disk $24.95 




sgsfr 



• STARDATE: 2200 

From Admiral Fitzpatrick - 
You are to enter and explore the Omega VI 
region of the galaxy, gather information on other 
inhabitable planetary systems you may encounter and 
defend yourself against hostiles in case of attack. You are 
in command of the Starship ENTERPRISE and her ship's complement of 
371 officers and crew. Omega VI is composed of 192 quadrants 
containing star systems and planets (a few habitable). Information on 
Omega VI is sketchy, but astronomical hazards such as pulsars, Class 
stars and black holes are known to be present in the region 
It is also patrolled by Klingon battle 
cruisers, so look before you leap. 



Available on Digital Cassette 
for Level II, 16K- $14.95 

TO ORDER: 
CALL TOLL-FREE 
1-800-258-1790 

9AM • 9PM, EST 



WR 



The Software Exchange 

bSct/hSlnvt.BoxW.Milloicl.NHmOSS Wi-m-5H4 



-Specs: Star Trek 111.4- 



Play Board: 8 by 8 by 3 quadrants 

Weapons Systems: Phasers and 

Photon Torpedoes 

Power Systems: Warp and Impulse 

Computer Systems: Science and 

Ship's computer 

Sensors: Long and Short Range 

Reports: Damage Control and 

Status 

Play Elements: 20 Klingon battle 

cruisers, 100 stars and planets, 

black holes, pulsars 
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from APPARAT INC. 



SUPERZAP! Its very name pro- 
mises results. This disk oriented 
BASIC program allows you to 
assault your diskettes, in one sector 
chunks, with all the normal protec- 
tion systems off. You can examine 
and modify your diskette in any way 
your heart desires (well, within the 
constraints of reality). Don't like the 
way TRS-DOS appears at the top of 
the screen everytime you do a DIR 
command? Then change it to read 
MY DOS! Or did you just kill a file 
that you need now desperately? 
Then go into the directory and 
restore it (providing you haven't 
written another file on top of it). 
And finally, have you ever wanted 
to see just what it was that was ac- 



tually written on the diskette? Then 
check it out! 

Yes, Superzap can do all of these 
things, and much more. 

Superzap was written for the 
TRS-80 by Apparat, the people who 
brought you NEWDOS, the R/S DOS 
that worked! 

Superzap provides the serious 
disk programmer with a fast and 
reliable method of handling the in- 
formation stored on a diskette. In its 
data dump mode the information is 
displayed in one sector (256 byte) 
chunks. Sixteen hexadecimal 
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numbers, and their ASCII 
equivalents, are displayed on each 
line of the video. The leftmost col- 
umn on the video, a set of six digits, 
is actually the relative address of 
the information in that sector. 

The first digit is the relative 
number of the drive that the sector 
you are looking at came from, the 
next two digits are the track number 
(in hex), while the fourth digit is the 
relative number of the sector on 
that track. The last two digits in that 
column are the relative position (hex 
again) of the first byte in each 16 
byte row of information being 
displayed on the video. 

You can easily alter the infor- 
matin on the video and put it back 
onto the disk in its new form, or 
even just terminate this mode 
without affecting the diskette. 

Even finding your disk sector is 
simple. You just specify the relative 
Disk Drive, track, and sector 
numbers wanted. In the newer edi- 
tions of Superzap you can also use 
the filespecs of the file in which 
you're interested. 

But this is not all that Superzap 
does. It can 

Zero Disk Sectors — and oh boy, 
does it. Don't play around with this 
one unless you really mean 
business. 

Copy Disk Sectors — as few or 
as many as you want. 

Copy Disk Data — this will allow 
you to copy a string of data up to 
655.36 bytes long from any position 
to any other postion on the diskette. 

Verify Disk Sectors — very handy 
if you think part of your diskette 
may have been 'cooked'. 

Disk Backup — this one alone 
would be worth the price of the pro- 
gram. It is very slow, taking 



anywhere from 5 minutes on up to 
complete its functions (as opposed 
to R/S's 1 and 1/4 minute BACKUP). 
But it makes up for this with its 
tenacity. In fact it never gives up 
unless you do. 

The first thing to do when enter- 
ing this command is to go make 
yourself a cup of coffee, as you're 
going to be waiting a while. As soon 
as Superzap encounters a problem, 
it really goes to work. You can ac- 
tually hear the drive going over and 
over that sector. After trying for a 
few dozen reads, it will tell you 
what the cause of its problem is, 
usually a PARITY ERROR, and ask 
you if it should; a) go back to work; 
b) skip this sector; or c) give up and 
return to command mode. As long 
as you're willing to sit there and 
punch the retry key, it'll keep trying. 

As you can see, I found Superzap 
to be a very useful program, second 
only to the Electric Pencil. 

This is not to say that Superzap 
cannot be improved. It can. For ex- 
ample, I would like to see the 
BACKUP command modified to 
display the information that it has 
managed to recover when it en- 
counters a bad sector and give me 
the option of copying that sector on- 
to the new diskette (even though it is 
flawed, maybe I can fix it using the 
rest of Superzap). As it stands now, I 
have to skip that entire sector and 
try to rebuild it completely. A very 
depressing prospect. 

Overall, I would strongly suggest 
that any serious disk user purchase 
this program for his/her library. 
After all, if you can recover even 
just one bad diskette using Super- 
zap, then it will have paid for itself. 



X 111 HIGH 

,by Chris Freund ■o(^ 3 ~~~~~ -^ 

For the thousands 
who have enjoyed '% 
X-Wing Fighter, %* 

X-Wing II presents 
a totally new element 
in the game! 



mm 



fc-^V Where X-Wing I left Death Star 
looming on the screen, X-Wing II lets you guide your 
fighter into the trench, find the exhaust port, aim and 
fire — all the while avoiding enemy fighters. Excellent 
graphics, 12 levels of play, ' and extensive INKEYS 
commands make this one of our' most exciting 
"real-time" games. 

Level II, 16K - $9.95 

The Software Exchange 

6 South Street, Box 68, Milford, NH 03055 603-673-5144 



fcfct WA£ 



by Art Canfil 




A Single-player Game 
Based on the China Trade of the 1800's 

Ply arms and opium in exotic oriental ports, dodging pirates, 
cutthroats, usurious moneylenders and tropical storms. Should you 
arm your ship to stand and fight, or keep it light to run swiftly? Will 
the price of opium still be high in Hong Kong when you return 
laden with the stuff from Batavia? Warning: If you get a polite 
message from Brother Wu, the moneylender or Li Yuen, the pirate, 
you'd better pay attention! If you outwit your enemies, you win by 
piling up a million dollars in profits. 

Level II, 16K- $9.95 




The Software Exchange 

h.VMhSWH.anHI VMrarfNHOWK Ul<-«7 i-'Ml 
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TWO ADVENTURES BY SCOTT ADAMS... 

THE COUNT 

You 're in Dracula's castle, and your mission is to destroy 
him and thereby rid the world of his evil. 

VOODOO CASTLE 

Remove a voodoo curse from Count Cristo and set 
him free forever! 

Two adventures... (Level II, 16K) 
$14.95 each; two on disk $24.95 

Now in machine language (or instant responses 
and more excitement! Plus! New versions of 
these old favorites: Land Adventure; 
Pirate's Cove; and Mission Impossible. 




The Software Exchange 

bScutt)Slnxl,Boxbti,M>lfntti.NIIOXm U)I-b7iSU4 
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ATTENTION 
ALL WAR GAMERS 

The war games you have come to love have 

come to the TRS-80! 

River • 

Hexagonal Grid • 

Terrain Obstacles • 

Armor, Infantry, and Engineers • 

Computer determined combat results • 



This Two Player game is an elementary war game 
(Kriegspiel is German for "war game") giving a battle bet- 
ween two countries located in opposite corners of the 
screen. The object is to capture the enemy capital. During 
play, each piece flashes in turn, displaying the number of 
moves left. You can move it, wait until you have moved 
other pieces, skip it, or even go directly to combat after 
moving only some of your pieces. You must stop and do 
battle whenever you are adjacent to an enemy piece. In 
battle, you can be eliminated, the other player can be 
eliminated, an exchange can take place, or a retreat may 
be required. You do the brainwork, General; the computer 
carries out your orders. Strategy and fate determine the 
battle! 

$7.95 Level II Cassette 




PRINT SPOOLER for the, 
TRS-80 Microcomputer \° 
and a Parallel Line Printer ® 





)\ This utility will allow you to print out a data file from 
disk at the same time you are running a program for 
£) something else on your computer. Now you don't have 
to stop working on your program to get a listing. 

Procedure: Save file to be printed as an ASCII file. 
^ Run the SPOOL routine from DOS I 

I Tell SPOOL the name of the file to print out. 
Load BASIC and run your other program. 

Restrictions: BASIC execution speed reduced 30 % 
Printer operates 35 % slower ', ©\ 
File to be printed must be ASCII file v 
Any printer commands in program you are run- 
ning will be printed to screen instead of printer 
Will NOT work under NewDOS (TRSDOS 2.3 and 
VTOS3.0 will work) \ 





Price $19.95 on tape, $24.95 on cassette 




The Software Exchange 

6SculhSlirel,Biw68,Mil!bKlNH0;055 603-673-514-! 









by 

Lance Micklus 



BUSINESS 



In the September issue of PROG 
80, I showed you yet another way to 
make your TRS-80 display upper and 
lower case letters. At the end of the 
article was jokingly added that if 
anybody tries this modification, I'd 
like to hear how it worked out, on 
the back of a post card with pictures 
of beach girls on the front. 

Well, I did get a reply. The 
gentleman actually sent a letter, but 
included three post cards of beach 
girls (TOPLESS!). I'm sure fie died of 
laughter when he got my letter 
back. Nowhere did I ever mention 
the beach girls. But I sure hinted at 
it. 

Also, in that issue, I gave you 
some POKES you could use to speed 
up the access time of your disk 
drives. Some interesting problems 
developed from this. 

Ever since I began running Ad- 
vanced Personal Finance, I noticed 
that when the Budget program was 
verifying the output files, it would 
sometimes read a sector, home the 
head, then read the sector again, 
and go on. This was the reason I put 
the display of the track and sector in 
the program. It turned out that the 
disk was going to the wrong track, 
would home the head, and then 
come out to the correct track. It 
didn't hurt anything, so I never real- 
ly tried to find out why. 

But, when I tried running APF 



with fast access speeds, it not only 
did all of the above, the verify then 
failed. I quickly discovered that 
BASIC was reading the data back 
with one bad byte whenever this 
happened. The data files were, in- 
deed, O.K. 

A short time later I tried APF 
under VTOS 3.0. Now something 
new happened. BASIC would get 
stuck reading the same sector over 
and over again . . . forever. It turned 
out other people were running into 
this problem using VTOS 3.0 and it 
was driving Randy Cook crazy. I 
sent Randy a copy of the file so he 
could reproduce the error, and by 
the end of November he had it all 
tracked down. 

Disk BASIC looks ahead one byte 
when it reads a sequential file. 
When it doesn't find what it's look- 
ing for, it back spaces one byte. The 
problem occurs when the end of a 
record crosses a sector boundary. 
Disk BASIC does not backspace cor- 
rectly. All of these weird effects 
result from this error. 

I do not have a patch for Disk 
BASIC to cure this problem, but I 
thought I should pass this informa- 
tion along to you. Until this bug can 
be fixed, beware that under 
TRSDOS 2.2 and 2.3, Disk BASIC 
may read bad bytes from sequential 
files at access speeds greater than 
40 milliseconds. 
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(More Magic from Leo Christopherson) 



This fast paced real time action game is a contest be- 
tween a Bee operated by the player and a Spider operated 
by the computer. The Bee tries to sting the Spider in a 
vulnerable spot while the Spider tries to jump up and 
swallow the Bee. Fast paced animation, sound, and real 
time action. Machine language subroutines, but loads as 
Level II for easy operation. $14.95 

The Software Exchange 

6 ScvlhSlnvt, Box b8.Milford.NH 03055 60J-673-5744 



PR Dogfight 




by David Bohlke 



A challenging game of 

aerial battle - you climb, dive, 

fire at the enemy forces, and with 

every hit you gain more points toward 

becoming an ace. But if you get too close, they'll shoot you 

down! Between raids, you land to replenish your fuel supply at 

friendly airstrips (but don't crash into the tree). You have 

seven missions to score 1,000 points. Total point accumulation 

chart, bar graph showing progress of each player, intelligence 

report of entire Battle Zone. 1-5 players. Excellent graphics. 

Level II, 16K $7.95 
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FOR MORE ADVANCED ADVENTURERS: 



SCOTT ADAMS' ADVENTURE! 

Marooned at the edge of the Galaxy you come across the ruins 
of ancient alien civilization, complete with fabulous treasures 
and alien technologies. Can you collect the treasures and 
escape or will you be forever marooned . . . Level II, 16K $14.95 

The Software Exchange 

.6 SouthStieet,Box68,Milford,NH 03055 603-673-5144 





Floppy Disk 
Diagnostic 

by Dave Stambaugh 



• 35 or 40 track in same program 

• Tests controller functions and status bits 

• Tests drive speed and allows adjustment 

• Tests switches and mechanical 
components 

• Verifies data transfer 

• Tests drive seek function 

• Sector and byte write and read tests 
using all possible patterns 

• 16 to 48K, 1 to 4 disk drives 

• Tests cross cylinder interference 

• Tests drive-to-drive compatibility 

The best and most complete diagnostic you can buy 
to verify disk drive reliability and find problems. 
Displays 19 error messages and cross references 
them to 14 possible causes. Continuous test option 
for exhaustive testing keeps statistical record of all 
errors found. 

Supplied on diskette with manual for only 
$24.95. 



The Software Exchange 

6 SouthStreet, Box 68, Millotd, NH 03055 603 -673-5744 




521MHT 
TfiUDllM. 

5tbd75tbdb 

A trademark of Lance Mlckliis, Inc. 



Radio Shack gives you a TERV program with its RS-232-C board, but that's 
just to whet your appetite. Features are: CONTROL key, ESC key, REPEAT 
key, a RUN key, and a functioning BREAK key. Also lets you list incoming data 
on your iineprinter. You can reprogram the RS-232-C switches from the 
keyboard, making baud rate changes simple. Fuily upper/lower cased 
keyboard and video driver are included, plus instructions on how to make a- 
simple hardware modification to display upper/lower case letters (This change 
is optional; unmodified TRS-80 will display upper case letters only. Supplied 
on tape, loads with SYSTEM command. 

Requires at least 16K Level II BASIC, a RS-232-C serial board, and a modem to 
work with a timesharing computer. The cursor control format includes clear 
screen, backspace, advance, down and up space, clear to end of line and 
home, using the most common control character format currently in use 
(similar to CDC terminals). Level II, 16 K Price $49.95 on tape 

ST-60 D (Enhanced Disk Version), adds these features: ■ ■ 

■ Gather and pre-format data, store It on disk, then transmit it to a 
timesharing computer for processing. 

■ Processed data from the timesharing computer can then be sent back 
to the TRS-80 

B One TRS-80 can generate a data base and share it with another 
TRS-80 thousands of miles away by telephone. 

■ Auto logon feature 

■ ST80D can transmit any type of TRS-80 ASCII file, including BASIC 
programs stored in ASCII format, and most BASIC data files. 

■ ST-80 D is a practical, full-feature terminal program that has been us- 
ed on a variety of timesharing systems. 

For32K disk systems - $79.95 



IheSoitware Exchange 

6 SaithStnvl,6ox 68, Miilord,NH 03OS5 6CH-673-5W4 
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_ ymbolic Trace and Debug 

powerful monitor for the TRS-80 with special ability in Tracing and 
Debugging. Single Step through machine language programs or s et up to 
three breakpoints, and look at this display format! 




I 




(IF K tt HL IX IV ftp BC' 
8644 W08 C800 B77C 6433 FFFF 0192 
4468 U> B.93 



DE' HL' SP PC 

4009 3FC0 41FC 4408 



All the power of regular monitors 

A FIRSTIO) LAST(FFFF) 
A FIRST 
B 

B VALA 
. . BVALAVAL8(0) 

C 

D FIRST(0) LASTIFFFF) 
E FIRST(0> 

F FIRST LAST VALUE 
Q BRKPTS (3 max.) 
H FIRST LAST VALUE 
. . 1 PORT 
K 
L 

L SECTOR MEMORY COUNT(1) 
M FIRST LAST BLOCK 
N 

N 

N VALUE 
N FIRST 
O PORT VALUE 
P 

P ENTRY 
P FIRST LAST 
Q FIRST LAST 
R 

S FIRST LAST OPTION(0) 
T COUNT OPTlON(6) 
U FIRST COUNT OPTION(O) 
V FIRST LAST BLOCK 
W SECTOR MEMORY COUNT(1| 
X FIRST LAST BLOCK 
Z FIRST LAST VALUE(O) 



as well. Look at these commands: 

ASCII dump 

formatted ASCII dump 

start ol branch table ■ ■ 

display in decimal 

hex arithmetic 

check system tape 

dump hex 

edit memory 

rind byte 

sel breakpoint, continue 

find word 

read port 

keyboard echo 

load system tape 

load from disk 

move memory 

display symbol table 

symbol table to tape 

dellne value (or symbol table 

define start symbol table 

write to port 

Initialize memory blocks 

write memory blocks and start 

define a memory block 

calculate checksum 

display / modily registers 

disassembler 

trace instructions 

unformatted tape I/O 

verily memory 

write to disk 

exchange memory 

zery memory 



ttifc, SEfc, a*«l 48K versions on one cassette for $24.95 
$£*% tram t*8« in Level II or as a command file from Disk) 

The Software Exchange 

6,. South Street, Box 68,MHfo&&WV3055 603-673-5144 




HexMem 

by John T. Phillipp, M.D. 



It's bound to happen sooner or 
later. You work on a program for 
hours and, while you're not wat- 
ching, the TRS-80 memory changes 
one or two bits. You CSAVE your 
program and get a perfect CLOAD? 
After all, what is being read from the 
tape is exactly what is in memory. 
But later, when you try to CLOAD, a 
LISTing produces garbage on the 
screen. You CLOAD again with a dif- 
ferent volume setting and get the 
same thing. After a few more tries, 
you realize with a sinking feeling 
that [he problem is not in loading 
the tape, but rather with what is on 
the tape. And you're going to have 
to re-do the whole program . . 

Don't despair . . . yet. If you know 
how BASIC stores programs, and if 
you have a monitor program that 
will let you inspect and modify 
memory you may be able to save 
your program, or at least part of it. 
And if you can save 8K bytes of a 
10K program that's 80% you don't 
have to retype! 

HEXMEM is a BASIC program 
which duplicates some of the func- 
tions of machine language monitors 
like TRS-DOS DEBUG and the 
RSM-2 monitor by Small Systems 
Software. Although it doesn't sup- 
port all of the functions of these 
sophisticated monitors (it does not 
access the Z-80 registers, for exam- 
ple), it does enable the user to con- 
vert hexadecimal numbers, display 
memory in hex or ASCII in a format 
similar to the machine language 
monitors, modify memory, enter 



machine language programs direct- 
ly, load other BASIC programs into 
memory with HEXMEM and save 
HEXMEM and other BASIC pro- 
grams on tape. 

The code for HEXMEM takes 
2,399 bytes, leaving 13,173 bytes for 
the other programs in a Level II, 16K 
TRS-80. It is densely packed into 

line numbers 1-28 without REM 
statements. This makes the program 
logic hard to follow, but was 
necessary since any program loaded 
into memory with HEXMEM must 
have line numbers greater than HEX- 
MEM itself. HEXMEM can reside in 
memory with any BASIC program 
whose line numbers begin with line 
30 or higher. 

Commands — all commands are 
single letters. When HEXMEM asks 
COMMAND? type the command let- 
ter (ENTER). HEXMEM will return to 
COMMAND? after the command 
has been executed. 




SUMMARY OF COMMANDS: 



H — 


Hexadecimal - 


D — 


Decimal 


G — 


Graphics 


M — 


Memory Dump- 


A — 


ASCII dump - 


E — 


Edit 


— 


Object code - 


L — 


Load 


C — 


Combine 


s — 


Save 



Converts hex to decimal 
value 

Converts decimal to hex- . 
adecimal value 
Converts any hex or decimal 
value to ASCII character 
Displays block of memory as 
hex values 

Displays block of memory as 
ASCII characters 
Displays and edits the con- 
tents of a memory location 
Enters machine language pro- 
grams 

CLOADs a BASIC program in- 
to memory with HEXMEM 
MERGES a BASIC program 
on tape with one in memory 
CSAVEs a BASIC program 
and HEXMEM on tape 



EXPLANATION OF COMMANDS: 

H — Hexadecimal 

This routine will convert any hex- 
adecimal number up to 10 digits to 
its decimal equivalent, although 
very large numbers will be displayed 
in decimal by exponential notation. 
Leading zeroes need not be entered 
0AF2 and AF2 will be converted the 
same way. Type the hexadecimal 
number (ENTER). 

D — Decimal 

This routine will convert any 
decimal number from to 65,535 to 
its hexadecimal equivalent. Larger 
numbers will not be converted as 
the routine will not produce a hex- 
adecimal number more than 4 digits 
in length. Type the decimal number 
(ENTER). 
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Addition and subtraction of hex- 
adecimal numbers may be done us- 
ing the H and D commands pro- 
viding the difference is not less than 
nor the sum greater than FFFF hex 
(65,535 decimal). Use the H com- 
mand to convert both numbers to 
decimal, perform the desired opera- 
tion, then use the D command to 
convert the result to hexadecimal. 

G — Graphics 

This routine will convert a hex- 
adecimal number in the range to 
FF or a decimal number in the range 
to 255 to its ASCII character, 
graphics character, or space com- 
pression code representation. 

Hexadecimal numbers need only 
be typed, then (ENTER) but decimal 
numbers must be followed by an X 
(enter as 127X, for example). If the X 



is omitted, HEXMEM will consider 

the number to be hexadecimal and 
an erroneous conversion will result. 

M — Memory dump (HEX) 
see also A — ASCII dump 

This routine will display the con- 
tents of any block of memory in 
hexadecimal 

HEXMEM asks for ADDRESS 
(H£X)#1? Type any hexadecimal ad- 
dress from to the top of memory 
(4FFF for a 4K machine. 7FFF for a 

16K machine) then (ENTER). 

Use the D command to convert 
decimal addresses into hex for the 

M command. 

HEXMEM then asks for ADDRES5 
(HEX)#2? Type a hexadecimal ad- 
dress which is larger than ADDRESS 
(HEXMfI. If no ADDRESS (HEX)#2 is 
typed, and only (ENTER) is pressed, 
HEXMEM will display from AD- 
DRESS (HEX)#1 to the top of 
memory. 

NOTE : 
HEXMEM is programmed for a 

16K machine. If you have more or 
less memory line 8 in the program 
must be changed: 

If H2$=^'-" THEN D6 =32767(1 6K) 
49151 (32K) 

65535(48K) 
20479C4K ) 

HEXMEM will display memory in 
lines of 16 bytes each. The address 
of each line is on the far left of the 
screen. For example, if the starting 
address is 4FB3 HEX the screen will 
display: 

4FB0: XX XX XX XX XX XX XX XX 
XX XX XX XX XX XX XX XX 

4 FCO: XX XX XX XX XX XX XX XX 
XX XX XX XX XX XX XX XX 



and so on, where XX is any hex- 
adecimal number from 00 to FF. The 
address of the first byte of each line 
will always end inO 

To stop the dump at any point, 
press any key on the keyboard. To 
continue the dump, press any key 
except K. Pressing K will return to 
COMMAND? 



A -ASCII Dump ' 

This routine will display the con- 
tents of any block of memory as its 
ASCII equivalents. Control 
characters and graphics characters 
are displayed as periods (.). (The 
ASCII equivalent of any HEX or 
decimal digit (00-255) can be 
displayed using the C command). 

The ADDRESS (HEX)? prompts 
should be answered in the same 
manner as for the M command, and 
the memory display is in the same 
16 byte line format. 

The A command is particularly 
useful for searching the memory for 
a BASIC program. Try displaying ad- 
dresses 1600 to 1700 HEX using this 
command. This is the area where the 
Level II BASIC ROM stores its com- 
mand table. HEXMEM itself resides 
in addresses 42 EA to 4C48 HEX 
(17130 to19528 decimal) and can be " 
displayed by the A command. 

E — Edit memory 

see alsoO-object code enter 

This routine is used to modify a 
single memory location by replacing 
its current value with a new one. 

HEXMEM asks ADDRESS TO 
CHANGE? Type in any HEX or 
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decimal address from to the top of 
memory, then (ENTER). Decimal 
numbers must be followed by an x, 
or HEXMEM witt consider them to 
be hexadecimal and errors will 
result. 

The current contents of that 

memory location will be displayed 
in HEX and decimal. 

HEXMEM will then ask for the 

NEW VALUE? Type in the desired 
value from to FF HEX or 0-25 
decimal. Again, decimal numbers 
must be followed by an X. Then 
press (ENTER). The contents of the 
memory location will be erased, the 
new value will be entered and HEX- 
MEM will return to COMMAND? 

Pressing (ENTER) after the NEW 
VALUE? prompt leaves the contents 
unchanged and returns to COM- 
MAND? This may be used to PEEK 

at one memory location rather than 
using the M command, especially if 
you want to know the address con- 
tents in decimal. 

Addresses from to 3000 HEX (0 
to 1288 decimal) comprise the Level 
II ROM and cannot be changed by 
the E command. Addresses from 
3001 to 42E6 HEX (12290 to 17128 
decimal) are RAM and may be 
changed although they are used by 
Level II BASIC for housekeeping 
and Input and Output. 

Changing them may cause the 
system to crash. Try it though — 
there is no danger to the TRS-80 
hardware from the keyboard. At 
worst, you may have to press RESET 
and re-load HEXMEM. 



O — Object code enter 

This routine is similar to the E 
command and is used for modifying 
a consecutive series of memory 
locations as when entering a 
machine language {object code) pro- 
gram. 

After the starting address is 
entered and its contents changed 
with a new HEX (or decimal plus X) 
value, HEXMEM advances to the 
next memory location, displays its 
value in HEX and decimal and ac- 
cepts the new value. Pressing 
(ENTER) with no value leaves the 
memory location unchanged and 
advances to the next. 

Typing K for the value leaves the 

memory location unchanged and 
returns to COMMAND? 

L — Load BASIC program 

This routine allows a BASIC pro- 
gram to be CLOADed into memory 
co-resident with the HEXMEM 

monitor. 

In order to CLOAD a BASIC pro- 
gram without erasing the program in 
memory (HEXMEM), some PEE King 
and POKEing is necessary. HEX- 
MEM does most of the work. 
However, after the CLOAD is com- 
plete, two more memory locations 
must be POKEd. These values — 
POKE 16548, 233 : POKE 16549, 66 
— should be typed in and (ENTER) 
pressed. The combined program 
(HEXMEM + BASIC program) may 
then be LISTed, RUN, CSAVEd (with 
the S command), EDITed, etc. 
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The line numbers of the BASIC 
program must be higher than those 
of HEXMEM, or HEXMEM will be 
erased during the CLOAD. HEXMEM 
uses iine numbers 1-28 so the BASIC 
program should start at line 30 or 
higher. 

Try this command with the 10 line 
demonstration program on the 
cassette just after HEXMEM. Its line 

numbers are 100-200. 

C — Combine BASIC programs 
This routine will MERGE a BASIC 
program on tape with one in 
memory. As wrrfj^the L command, 
the program on tape must have 
higher line numbers than the one in 
memory, or the program in memory 
will be erased during the CLOAD. 



The same two memory locations 
must be POKEd after the CLOAD as 
with the L command. Follow the 
prompts on the screen. 

The C command will enable fre- 
quently used sub-routines to be 
stored on tape and then added to 
new main programs as needed, sav- 
ing the trouble of re-typing them. 

After the programs are combined 
in memory, type DELETE 1-28 
(ENTER) to erase HEXMEM. The. 

combined program may then be 
LISTed, RUNorCSAVEdontape. 

S — Save 

This routine will CSAVE HEXMEM 
and any other BASIC program in 
memory on cassette tape. 



128 PRINT 'THIS IS LINE 126 ? * 

REM* 

188 REM * THIS IS LIME 168 

118 ' LIME lie - ABBREVIATION FOR. 



This is an example of how BASIC stores program test. 
The ASCII dump and the HEX dump are looking at the same block 
of memory— address, 



COMMAND? M 




ADDRESS <HEX) #1? 7218 




ADDRESS (HEX) #2? 725f 




72-10 


41 31 24 3fi Eft 22 41 22 


88 32 72 64 86 93 28 2A 


7226 


28 54 48 49 52 28 49 53 


28 4C 49 4E 45 28 31 38 


rm 


38 08 SC 72 6E 88 3A 93 


FB 28 4C 49 4E 45 28 31 


7248 


31 36 28 2D 20 41 42 42 


52 45 56 49 41 54 49 4f 


7258 


C28464F522852 45 


4D 28 2fl 88 78 72 78 88 


COMMAND? HEX DUMP (ft COMMAND) 


- 
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COMHfif©? ft 












RDDRE5S <HEX) 11? 7216 












ACCESS (HEX) #2? 725F 












7218 


dlt:. " 


ft * 


. 2 


R 


f> . . 


* 


7228 


THIS 


I s 


L 


I 


N E 


i @ 


7228 


8 . S R N . 






L 


I N E 


1 


7240 


10- e 


B 6 


R E 


V 


I fl T 


I 


7250; N FOR 


k £ 


H 


* 


. X R 


A . 


CQrfWKr? ASCII DUMP 


(fl COttfWP>_ 









These addresses contain the last 6 
bytes of HEXMEM and the beginn- 
ing lines of the demonstration pro- 
gram. One HEX number of 2 digits 
OO — FF HEX can store the numbers 
0-255 decimal, the same as 1 0-bit 
binary byte. 

By looking at the LISTing, and 
comparing it to the HEX and ASCII 
dump one can learn how BASIC 
stores the program lines. 

OO is used by BASIC as the ter- 
minator of every line. Following 00 
are 4 bytes (4 HEX digits) which are 
housekeeping for BASIC. The first 2 
bytes are the memory address of the 
start of the next line, given with the 
least significant byte first, most 
significant byte last. 

At location 7219, the address 
bytes are 7232 meaning that the 
next program line (line 110) starts at 
memory address 7232. Looking at 
the HEX dump, it is seen that the ter- 
minator of line 100 (00) is at address 
7231 and 7232 is the beginning of 
the next line. 

The next two bytes 64 00 in ad- 
dresses 721B-721C are the BASIC 
line number of the line given in HEX 
least significant byte first -00 64 
HEX equals 100 decimal (use the H 
command). This is why BASIC line 
numbers cannot exceed 65,535. 2 
bytes can only store up to Ff FF HEX. 



Lines 110 (006E HEX), 120 (0078 
HEX), 130 (0082 HEX) up to line 200 
(00C8 HEX) of the demonstration 
program may be identified the same 
way as line 100 was. 

If the byte following the line ter- 
minator 00 is (meaning address of 
the start of the next line is 0) BASIC 
assumes it has reached the end of 
the program. This is as far as the pro- 
gram can be LISTed on the screen, 
even though the complete program 
remains in memory and can be ac- 
cessed by the A of M commands. 

After the four housekeeping 
bytes, BASIC starts the text of the 
line. To conserve memory space as 1 
byte abbreviations: 

80 HEX = END 

81 HEX = FOR 
8A HEX = DIM 
87 HEX = NEXT 
8D HEX = GOTO 

91 HEX = COSUB 

92 HEX = RETURN 

93 HEX = REM 

D5 HEX = = (Equals sign) 

and so on. 

The complete list of BASIC 
TOKENS AS STORED IN MEMORY 
may be found in the May, 1979 issue 
of Prog 80, page 34. 
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The rest of the line is stored byte as 
the HEX equivalent of the decimai 
ASCII character codes. The com- 
plete list (in decimal which can be 
converted to HEX by the D com- 
mand) may be found or> page C/2 of 
the LEVEL II BASIC REFERENCE 
MANUAL. 

08— If are cursor control codes 

20-7F are ASCII character codes 

80 — BF are graphic codes 

CO— FF are space compression 
codes (tab 0-63 spaces) 



This method of storage and 

housekeeping explains the 'garbage' 
seen on the screen after a bad 
CLOAD is LISTed. 

If any byte of the code in memory 
has been changed to 00, BASIC 
assumes the next 2 bytes are the 
starting address of the next line, and 
the 2 bytes after that are the line 
number. Following bytes are LISTed 
as the full printing of the command 
abbreviations (see BASIC TOKENS). 
This mess is complicated by the fact 
that HEX digits 08- IF are moving the 
cursor all over the screen and caus- 
ing the commands to be printed 
anywhere at random. 



i CLEFIRie0:CL5 :DIHH<16>, Hl(if-), X$<16) :X*="0122456?8SflK»EF" :DfiTfi 

'T, "1", "2".- "3".- "4". "5".- %", "?"> "8", "9*.- "A"/ "B", *C", *D", "E"> "F" ; 

V*="28":U*="H1GHEST LINE IN l€H0RV":M="":T$=*T0 ERfiSE HEXMEft T 

VPE: DaETEi-28 <£NTER>":' 

* HEKMEM VER i. 1 * 

2 P=0 : 0=0 : J NPU7*C0MHflND"i C* ; IFttsTHHErCELSE IFCt="D"THEN4ELSEIF 

C*= B 6 H THEN3aSE 1 FM="M B THErJ8£LSE If C*= u ft"ThW=l : GQT08ELSE 1FC$*"E 

"THEMSELSE I FC*="0"THENO=1 : :GQTW5ELSE1FC *="L"TrEH24ELS£ IFtt="C n 7 

HEMV»=U* :D$=7t :G0T024ELSEIFC*="S ,, THEN28ELSEPRlHT*+INVfiLID+" : GOTO 

2 

i IHPOl , 'HEXflDECIMflL"ift*:fi*=»0«*ft*:GOSUBi3:PRINT» DEClMflL =",D:G 

0TG2 

4 IHPUT"DECl«UL"i 0:«KUB21:PWMf HBtfOEClHHL = ";W<i>+H*<2)+H 
*<2)+Hf (4) :G0TCi2 

5 INPUT-HEX OR DEC <TVPE X AFTER 0£CIHflL)M1$:IFRIfHT$(Hl..i)O"X 
"TrHifi^rt$:GC6uW9:r1r1s[)ELSEI«=ynt(f») 

6 iFHn<i2THErffi*="C0NTRa. mnm:m.'EisEiFm=3^m^mimm^"Sf 

RCE "ELSE 1 FMIK192THEN6*sCHR><m>ELSE IFHH<=255THE«»= d TflB F»:"+STR 
f(WM92>+" SPflCES* 

7 PRINT" ASCII CHflRflCTER = ";G*:G0TO2 

8 Hl$= " " . H2I= " " : I NFUT "flODRESS <HEX) #1"; HI* : fl»=Hl*: 60SUB19 : GOSUE 
27: D5=D : INPUT "ADDRESS <HEX) #2"; H2* : fit =H2* : G05UB19 : D€=D; LF=1 . W=D 
5:PRIrlTHl* n . ", : I FK2*= " " THEND6=32?6? 

9 F0RH-D6T0P& : G*=I NKEV* : !F6IO""GGSUB26 
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10 IFLF=i?TH£ftF=l : H=W+16 : PRINTCHRK2S) : D4{. G0SU821 : PRIHTHKDi H 
«2)iWO>iW<4)i": "i ■ 

11 HlsM:IFHi>32?67THENHl=Ml-655S5 
12DaPEEK<Hl):IFP=lTHENa^JB2^LSE60SUB22 - ■ 

12 PRIHTHIG); K*<4); " "i :LF=LF+1: iFLF=SPR!NT" "; 

14 NEXTR: PRINT :G0T02 

15 INPUPRODRESS TO CHANGE (HEX OF: DEC ~ WE X ftFTER DEO"; ft*. I 
FH*= H K n TIC*H30T02£LSEIFRIGHT*<K*, i)<>"X"7l€HR$=M* : G0SL©l9:H[1=DEtS 

Btt4fL(R*> 

16 PRINT-CURRENT CONTENTS: "> : IFNW>32767THENHN=ffl-65535 

1? CC=PEEK(t*):D=CC:GOS*,22:PRINMG)+H$(4);" HEX <".;CC,."DECIH 
Ft>*:W="":PRINT:INFW"N£W VflLUC <KEX OR DEC - TVFE X AFTER DEC) 
^MI:IFKt="THENNHsttELSEIFH«sT'THEHG0T02aSEIFRI<jHT*(l1$ J i)O*X 
" Wm$=m : 60SUB15 : HN=OELSENH=VfiL (W > 

18 POKE!HNN:IFO=8THBJGOT015ELSEPRINT"NEXT ADDRESS - "; :NN=NM+i: 
GOTOie 

19 D=8:K=l:F0RJ=lT0LEN<fl*)-l:K=K*lG:NOTJ:K=INT(K+. 81):F0RI=1T0L 
ENffi*) : FQRJ=1T016: IFHID*<A$, L 1)=H1D$<X*> J.- i)THENGOTQ20ELSENEXTJ 
28 D=0+K*<J-1):K=K/16:N£XTI:RETURN 

21 H<l)=INT<D/4096) :Dl=D-H(l)*40%:H(2)=im(Dl/256) :D2=D1-H<2>*2 
56 : HG)=M(D2/16> :D2=D2-HG5*16:HC4)=D3 : F0RMTO4 : RESTORE ; F0R2= 
8T0H<X> : REflDHKX) : NEXT2 : NEXTX : RETURN 

22H(2)=INT<D/'16):D1=D-H<3)*16:H(4)=01:FC«X=3TO4:RESTC«E:FORZ=8T 
OB<X) : REflDHKX) : NEXTZ: NEXTX : RETURN 

23 B$G)=" •:IF1K32THEHH$<4>*-. •:RETURNELSEIFD>127THENH*(4>s". ": 
RETURNELSEHK4)=CHR*<D) : RETURN 

24 PRINT'BE SURE LINE NUMBERS ARE GREATER THAN ";V*j". ":PRIHT H W 
EN TAPE RECORDER STOPS, TVPE:":PRINT"FtiKE 16548,233: POKE 16549. 
66 <ENTER>" : RR1 HTD$ :PRINT : PRINT "PRESS <HflE8> WHEN READY TO * 

CLOflD *":IHPUT8i* 

25 IFP£EK<16623»=2THENP0KE16548, PEEK<±6633>-2 : P0KE16549, PEEK<16 
634) :a0«:€LSEP0KE16548, PEEKX 16633) +254 :P0KE16549, P£EK<16634)-1 : 



26Gf=INKR , *:]FW= ,l "T>£HG0TC26ELSEIF0$="K H THENF*:INT:aiTi32ELSERET 

m 

27 IF<D<i6)rjR'<Hl$=" u )THO*=0:Hl$="0«€f:R£THRNELSEIFD/i6=INT<O/l 
6)MHRERiRI€LSED^(D-INT(D/i6>*16):60Slie21:Hll=HI(l)+m-(2)+W-( 
3>+H*<4): RETURN 

28 CLS:PRIHT"PRESS <ENTERI> HHEN REflDV TO * CSflVE *";1NPUTA1$:C 
SAVE'R" 
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SHORTHAND for LEVEL II 
and DISK BASIC 



ft TSHORT™lets you type LEVEL II and/or DISK BASIC more 
quickly and accurately than ever before. Save up to 90% 
programming time and achieve 100% accuracy. 

ft 31 programming statement keys. 

ft KUSTOM ™ key, up to 64 characters - changeable anytime. 

ft 42 key decals (see picture). 10 area different for DISK users. 

ft A single, shifted-key entry types entire statement on screen. 

ft Fast, efficient machine language. 

ft Uses 580 bytes of LOW memory, i.e.: No MEM SIZE req'd. 

ft Comes on cassettes, one side LEVEL II, the other for DOS. 

ft Compatible with DOS 2.1, 2.2, 2.3, NEWDOS, KBFIX, etc. 

v. DOS version loads to and executes from disk via TAPEDISK. 

if. Features self-entering commands: CONT; GOTO10: 



KUSTOM™ (Self-enter optional) 
ft TSHORT ™ W/4 page instruction manual 



$9.95 




TO ORDER: 
CALL TOLL-FREE 
1-800-258-1790 

9AM - 9PM, EST 



The Software Exchange 

6SonhSlnfl,Box6S,lvtllord,m030SS tfa-b7l-5\M 
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DISK 
EXPANSION PACKAGE 

This package includes everything necessary to add disk 
capabilities to your TRS-80. To buy everything in this package 
at the local Radio Shack store would cost $1100.00. 

PACKAGE INCLUDES: 

• 16K RAM Expansion interface 

• PERCOM Data Separator, installed 

• PERCOM TFD-100, 40-track disk drive 

• Dual disk drive cable 

• NEWDOS Disk operating system HARDSIDE 

• 10 BASF diskettes SPECIAL PRICE $899.95 



SMALL BUSINESS PACKAGE 

SAVE $579.00 

An ideal starter package for the small business. In- 
cludes a TRS-80 with 16K RAM and Level ll BASIC, an 
expansion interface with an additional 16K RAM In- 
stalled, two Percom disk drives with cable and data 
separator, NEWDOS disk operating system (40 track 
version) and the Centronics 730 line printer. 

$2799.95 



50 




LIST OUR 
PRICE PRICE 



TRS-80* COMPUTERS 






Level-I 4K 


$499 


$449 


Level-ll 4K 


$619 


$559 


Level-I 1 16K 




$669 


Level-ll 16K, w/keypad 


$849 


$769 


EXPANSION INTERFACE: 






OK 


$299 


$269 


16K 


$448 


379/403 


32K 


$597 


479/537 


DISK DRIVES: 






Percom, TFD-100, 40-track 




$399 


Percom, dual TFD-100 




$795 


Percom, TFD-200, 77-track 




$675 


2-drive cable 




$29 


4-drive cable 




$39 


Radio Shack, -0 


$499 


$469 


Radio Shack, -1, 2,3 


$499 


$459 


PRINTERS: 






Line Printer III 


$1999 


$1849 


Centronics 779-2 


$1598 


$1095 


Line Printer II 


$999 




Centronics 730 


$999 


$899 


Centronics Pit 


$499 


$419 


Quick Printer II 


$219 


$197 


QP-II Exp. Int. Cable 


$20 


$18 


t Cable required 


$39 


$35 


ACCESSORIES: 






Telephone Interface 


$199 


$179 


16K Memory Kit 




$99 


16K Memory Kit for E.I. 




$95 


RS232-C Interface 


$99 


$89 


TRS-232 Interface 




$49.95 


Data Dubber 




$49.95 



PRICES EFFECTIVE JANUARY 1, 



IMPORTANT! 

5JC COD orders require 
25% cash deposit 



5fCPrices do not include shipping 

5|C Prices subject to change 
without notice 



WRITE FOR OUR FREE HARDSIDE HARDWARE 
CATALOG! 

6 South Street Milford, New Hampshire 03055 (603) 673-5144 

•Radio Shack and TRS-80 are trademarks ol Tandy Corporation. 5-1 



HIGH SPEED 
STRING 
HANDLING 
IN BASIC 

by Marty Zwiiling 



If you have a Level li BASIC pro- 
gram which manipulates a lot of 
text or character data, you have pro- 
bably noticed that it will intermit- 
tently "hesitate" or run slowly dur- 
ing execution for no apparent 
reason. These pauses are due to a re- 
quired reorganization of the 
available string space pool, the size 
of which is defined on the CLEAR 
command. The time required for 
this reorganization varies in propor- 
tion to the number of string 
variables and string array elements 
defined and in use, and may range 
from trivial to many minutes with 
several thousand string elements in 
use. This article will discuss techni- 
ques for assessing and minimizing 
this delay. 

As indicated in the Level II BASIC 
Reference Manual, space for 
character string variables and 
character arrays is dynamically 
allocated at run time from a single 
pool of free string space defined by 
the CLEAR xxx command. For exam- 
ple, consider the following program 
segment: 



is clear mm 

20 DIM fl*(108) 
36 FOR I=1TO106 
48 INPUT fi*(I) 
50 NEXT I 



These statements might be used to 
define space in memory for 1 GO pro- 
duct names and prompt the user for 
these names. More precisely, the 
CLEAR command reserves 1000 
bytes of memory which is available 
only to string variable text (the 
variable name, length, and a pointer 
to the text are stored elsewhere). Str- 
ing variables must end in a $ or be 
defined via the DEFSTR command. 
In this case, the 100 elements of A$ 
must not average more than 10 
characters each, or an OUT OF STR- 
ING SPACE error will occur. 

As string elements are assigned, 
space is sequentially used from the 
high addresses of the string pool 
down to the low boundary. All 

available free bytes are contiguous: 
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free space 



20 bytes 

A$(100) 



5 bytes 
A$(1} 



A$(0) 



A problem begins to occur, assigned the value A$(1) = 

however, when a given element or REFRIGERATOR, the five bytes for 

variable is reassigned a new value. RADIO are no longer used and the 

For example, if A$(1) has the value new value is assigned in the free 

RADIO, and later in the program is space area: 



free space 




20 bytes 
A$(100) 



5 byte; 
hole' 



A$(0) 



When string assignments and 

reassignments have exhausted the 
free space area, a "reorganization" 
of the entire pool is required to con- 
solidate all the holes into useable 
free space. This reorganization in- 
volves moving the data from all str- 
ing variables in the pool to con- 
tiguous addresses at the high end of 
the area. The time required to do 
this is the "hesitation" referenced 
earlier. 



Notice that the five bytes released 
cannot immediately be used for new 
assignments, since they are not con- 
tiguous with other available space. 
These "holes" in the string pool are 
always created by the reassignment 
of a variable value, even if the new 
value is shorter than the old. 
Previous holes are also not used for 
new variable assignments. 



Before Reorganization 



A$(9) 



hole 



A$(100) 



hole 



A$(1) 



AS(S) 



hole 



A${4) 



After Reorganization 



free space 


A$(9) | A$(100) 


A$Cl) 


A$(5) 


A$(4) 
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The reorganization is an 
automatic function of BASIC, and 
will occur as necessary in the midst 
of statement execution. The BREAK 
key is ignored until the completion 
of the reorganization, so the CPU 
appears to lock up during this pro- 
cess. The frequency of invocation is 
a function of the amount of 
reassignment of string variables be- 
ing done by the program, and the 
amount of unassigned space in the 
pool. The duration of the 
reorganization function is determin- 
ed primarily by the number of string 
variables with values assigned as 
follows: 



Number 


Elapsed time 


of strings 


to reorganize 


10 


trivial 


100 


3 seconds 


500 


45 seconds 


1000 


3 minutes 


2000 


12 minutes 



Note that the elapsed time to 
reorganize goes up exponentially as 
the number of assigned strings in- 
creases. The time required to 
reorganize even 500 strings is nor- 
mally intolerable, but 500 strings 
may be needed to hold even 100 
names and addresses in memory 
(DIM N$(100),A1$(10O),A2$(1OO),A3$ 
(100),A4$(100)). 

To measure the reorganization 
time in your own program, simply in- 
terrupt the execution at various 
points with the (BREAK) key and use 
?FRE(A$) to display the free pool 
space available. The FRE command 
will always cause a reorganization 
of the pool to get an accurate 
assessment of space available, and 
you can time the response to this 
command. If the response is not im- 
mediate, you need to implement 
one or more of the recommenda- 
tions given below. 



Here are some ways that you can 
minimize the reorganization pro- 
blem through careful programming: 
1 Always store numeric data in 
numeric variables and arrays. 
Multiple conversions from 
characters to numerics is 
much faster than string 
reorganization with many str- 
ings. 

Combine strings within a 
single array to minimize the 
number of unique strings 
stored. For example, in the 
name and address case above, 
use a single array NA$(100) of 
100 elements, each containing 
a name and four address lines 
concatenated into a single str- 
ing with imbedded line 
returns. Strings may be com- 
bined to a maximum length of 
255 characters. 

3. Use tape and disk to store 
character data, rather than 
keeping it in memory. 

4. Define your string pool as 
large as possible with the 
CLEAR command to minimize 
the number of trips through 
reorganization. 

5. Use simple string assignments 
directly in your program 
(A$ = "SAMPLE") or use READ 
and DATA statements, since 
string pool space will not be 
used by these assignments. 

6. Minimize the use of substring 
assignments (RIGHTS, LEFTS, 
MID$) and concatenations 
(A$ + B$), since these require 
additional space in the string 
pool for intermediate work 
areas. 

7. Do your own string pool 
management with assembler 
language subroutines. 
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8. Store character data in 
numeric arrays through 
manipulation of variable and 
string pool pointers as shown 
below. 

I have developed routines in 
Level II BASIC to store, retrieve, and 
manipulate the text for over 500 
checks in memory for a personal 
finance program, with negligible str- 
ing pool reorganization delays. This 
was accomplished by using double 
precision numeric arrays to store 
the string data. 

Each double precision number is 
eight bytes in length and can thus 
hold eight characters or letters. Ar- 
rays of these numbers are always 
allocated contiguously, allowing a 
24-byte string to be contained in 
three contiguous elements of the ar- 
ray. Since strings are not normally 



all the same length, I stored the ex- 
act length of each string as the first 
byte of the string in the numeric ar- 
ray. 

For this approach to work well, 
the strings must be similar in length 
so that little space is wasted when 
each string is started at a new ele- 
ment in the array. In my case, the 
strings were the payee names from 
checks which I limited to 23 
characters in length, which always 
occupied 3 elements of the array. 
This convention always left room 
for the exact length count 
(3*8 = 1+23). 

A subroutine was required to 
move the data from a standard str- 
ing variable A$ to the proper three 

numeric elements of the double 
precision array P#(S00*3). Note that 
1500 numeric elements are needed 
to hold the 500 strings anticipated. 



1080 REM * SUBRaiTINE TO ROVE 8$ TO P#<Z,Z+l,Z+2> * _ 

1018 V=VfiRPTR<P#G*Z~2.»: POKE V,LEN<fi*> 

1028 XX=PEEK< 16598) : VV=PEEK( 16599) : X=V+LEN<fll) 

1838 POKE 16539, INT CX/256) :P0KE 16598, X-INT<X/256>*256 

1048 2Z=PEEK<16545>: POKE 16545,9: ft*=R*+ H " 

1050 POKE 16545, 2Z: POKE 16598, XX: POKE 16599, VV 

I860 RETURN 



Line 1010 gets the address of the 
beginning of the desired numeric 
element and sets the actual string 
length as the first byte of the first 
element. Line 1020 saves the current 
address of the end of the available 
string space pool and calculates an 
equivalent address in the numeric 
array (beginning of element + 
length of string). Line 1030 tem- 
porarily sets this new address in 
16598-16599 as the high end of the 
string space pool. Line 1040 saves 



the low end of the pool address MSB 
and zeroes it out to prevent a 
reorganization attempt. The state- 
ment A$ = A$ + ""wili cause the str- 
ing to be moved into the numeric ar- 
ray behind the length byte from its 
current location in the string pool. 
Line 1050 resets all original pointers 
for the return. The value of A$ has 
now been quickly and safely stored 
in the numeric array. A simple call- 
ing sequence to this subroutine 
might be as follows: 
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190 FOR 2=1TO500 

116 INPUT#-Lfi$: GOSUB 1086 

126 NEXT Z 



A second subroutine is required the data, but simply alters the string 

when referencing the data already pointer portion of A$ to address the 

stored in the numeric array. This string within the numeric array, 
routine requires no movement of 



2896 REM * SUBROUTINE TO POINT fi$= P#<L 1+1,1+2) * 
2810 W=VfiRPTR<P# (3*1-2) )+l: ZZ=VARPTR(fi*> 
2020 POKE 2Z,P£EK(W-1): IF VV<8 THEN VV=YV+65536 
2630 POKE ZZ+2, INT<W/256):P0KE 2Z+1, VV-INT(VV/256)*256 

2040 RETURN 



Line 2010 loads YY with the address 
of the desired text string, and ZZ 
with the address of the A$ length 
and text pointer. Line 2020 sets A$ 
with the new length, and adjusts the 
text address if above 32 K. Line 2030 
sets the text address in A$ to point 
to the text in P#, and the operation is 
complete. A typical calling sequence 
to display the strings would be as 
follows; 



288 FOR I=iTO500 

216 GOSUB2008; PRINT fl$ 

220 NEXT I 



A few precautions are required 
when using the above approach: 
1. Never define a new variable 
between the use of VAPTR to 
get the address of a variable 
and the use of that address. 
The old variable may be mov- 
ed to make room for a new 
variable. In my example, XX, 
YY, ZZ, X, Y, and Z must be set 
to zero at program initializa- 
tion. 



2. Make sure that the character 
strings will fit in the allotted 
space in the numeric array 
before moving them, to pre- 
vent overl ay of other data. 

3.Be careful when swapping 
two values in the array, such 
as during a sort, since simple 
string assignments (8$ = A$) 
may not cause data move- 
ment. Use a dummy con- 
catenation such as 
B$ = A$ + "". 

In summary, you can dramatical- 
ly affect the speed and useability of 
your BASIC program by your pro- 
gramming techniques relative to 
character strings. The techniques of- 
fered here range from simple to 
complex— all you have to do is 
match the best approach to your re- 
quirement. 
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NEW! utility package from NEPENTHE PROGRAMS 




Programming utility for professional programming. 

File Manager 80 will organize tape and disk file routines, 
print a dictionary of items specified by you, edit items 
already specified and create record layouts using the items 
you have described. It will even create the code Tor your in- 
put/output routines, Including format, sub-record, get, and 
put routines, and store them as temporary files to merge in- 
to your programs. It will maintain a dictionary of the 
subroutines you create and the variables used. 

Minimum configuration is one disk and 32K of memory, 
but two disks are strongly recommended. Comes on disk 
with manual for $49.95 . 
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I Disk Payroll I 

Features: 

* Accepts any number of 

employees 

* Prints check summary on line 

printer 

* Prints out quarterly summaries 

SAMPLE OUTPUT: 

EMPLOYEE QUARTER-TO-DATE SUMMARY FOR PAYROLL PAY 2 



Employs* 



Qross Fed. FICA State City Other 



David £ Smith 


456-78-9999 


500.00 123.81 


30.00 


20.00 


10.00 


0.00 


Cindy D.Taylor 


444-55*866 


500.00 123J31 


30.00 


20.00 


10.00 


0.00 


Philip S. Jones 


454-54-5454 


280.00 27.78 


16.00 


11-20 


5JJ0 


0.00 


Jane Doe 


555-56-5555 


240.00 23JJ1 


14.40 


9.60 


4.80 


0.00 


J.T. Johnson Jr. 


511-11-5111 


400.00 34.12 


24.00 


16.00 


8.00 


0.00 


Mary M. Marks 


400000004 


280.00 34.12 


16.80 


11.20 


5.60- 


0.00 


ChB»NFOflMAT«NLEa»«FOflrVWROLLPAY2 f+OVWBERHWa) 




Name 


Soc Sec No. 


Gross Fed. FrCA 


Stats 


City 


Other 


Net 


David E. Smith 


456-78-9999 


500.00 1Z81 30.00 


20.00 


10.00 


0.00 


316.19 


Cindy D. Taylor 


444-55*666 


500.00 123.81 30.00 


20.00 


10.00 


0.00 


316.19 


Philip G. Jones 


454-64-6454 


260.00 27.78 16.80 


11.20 


5.60 


0.00 


218.62 


Jane Doe 


656-55-8655 


240.00 23.18 14.40 


9.60 


4.80 


0.00 


188.02 


J.T. Johnson Jr. 


511-51-6111 


400.00 56.11 24.00 


16.00 


8.00 


0.00 


295.89 


Mary M.Marks 


40000-0004 


280.00 34.12 16.80 


11.20 


5.60 


0.00 


212.28 



Company 



2200.00 38831 132.00 88.00 44.00 0.00 1547.19 



SUMMARY OF ALL EMPLOYEESCACTIVEANDTEP.MINATED} 



Gross 



Fed 



F!CA 



Slate 



City 



Other 



QTD 2200.00 
YTD 6515.00 



388.81 
1121.92 



132.00 
402.50 



88.00 
363.00 



44.00 
128.00 



0.00 
40.00 
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VmSafhuate Exchange 

6SculhSWe<,Box6&,MlfoKt,NH03CSS m-SB-St44 



Level II, 16K. $39.95 
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by Roger Robitaille, Sr. 

Inventory 'S' is an exciting advance in 
small business software for the TRS-80. Its 
in -memory system of data storage solves the 
problems of both sequential and random access 
files while providing extremely fast, random 
access to any record. Other advantages include 
the ability to use any combination of characters 
for stock nur.ber, an exceptionally flexible record 
format (field names are user-definable), and the 
ability to store data to tape or disk and upgrade at 
any time. Up to 150 items can be stored per 16K of 
available memory, with stock number, descrip- 
tion, cost, vendor, reorder, and profit data in each 
record. An important feature is the ability to use 
your present stock numbers (a sort function is 
included), unlike competing systems which force 
you to use a different "record number". 
User-definable screen and printer reports let you 
see just the data you need, when you need it. 

Inventory 'S' is an extremely powerful 
business management tool which can be used 
effectively with a 16K, tape based system or a 
48K, disk and printer system — a claim nobody 
else can make! 

Tape version, 16K (min), Level II — $24.95 
32 K Disk version - $59.95 

(same as tape, but on diskette with additional Disk I/O) 

Now Includes Invoicing 
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by Lance Micklus 



First, we took the tape version of PERSONAL FINANCE and 
converted jt for use under DOS. Then many new features were 
added such as self-verifying files which protect themselves from 
most common hardware faute fc and the BUDGET program 
which collects data - automatically from the CHECKING 
program, and manually from the keyboard. Advanced Personal 
Finance will produce a 30-page report that gives you the total 
picture of your financial posture. To complete the package, a\ 
SAVINGS account program lets you use theone sayings account 
as if it were ten individual' accounts. Thi§ way you can set a 
certain amount of money aside for Christmas, save, an additional 
1 amount for a rainy day, and keep'track of how much is for what. 
Also included afe programs to convert the data file on tape 
from the regular personal finance program to disk. 

On a 32K disk system, the. package will* handle about" ,29Q I 
checks per month and 900 checks per year. There are 33 
different account names Which are set up with DATA statements, 
Jn^each program on the disk; *". - ^ «"*•'• < 

The minimum system required is 32K Disk BASIC with one 
drive. The addition of a line printer, a second drive, and 
upper/lower case video display* alL enhance ' the features. A , 
second disk {not supplied) is required to store your data, as the 
program disk is very full. ' Pricey!*" 



Original Tape Version: Persona! Finance $9,95 




:*j>6 SoJthStrc$l,B6xWMilto)-d,NHOW55 603-B73ip§ 
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TYPING 
TUTOR 



by 

Roy Groth 

probably have often thought 
that it would be a lot easier if you 
didn't have to "hunt and peck" 
at the typewriter or 
computer keyboard. If you 
could only double your typing 
speed, the job would be done 
in half the time! And, with 
increased speed and confidence 
comes increased accuracy. 

Level II, 16K — $19.95 

Typing Tutor is a set of programs designed to teach you touch 
typing — from the basics of learning where the keys are, to 
practice drills at speeds that would make a Selectric shudder! Each 
lesson is displayed on the screen, including, at the early stages, a 
keyboard diagram. You are quizzed and graded, and you progress 
at your own pace. When you have mastered a lesson, the domputer 
advances to the next, using CAI (computer aided instruction). 
Progress is fast, painless, and even fun as you keep pushing to 
break your own record. 

So, whether you're going back to school or just want to enter 
programs from SoftSidethat much faster, Typing Tutor can help. 

Order a copy today and be a better typist by next week. 



The Software ExcStange 

6SoulhSlreti,lSoxbS,Milkxd,NH0XS'i U)i-b7i-Sm 




Programming Problem? Question about a TSE Program? 

Try our Hotline... 

You can call our programmers direct on Tuesday nighls from 7 lo 10 PM. (EST) 

(603) 673-5144 
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CTR-41 byBobCahill 

MODIFICATIONS 

Would you like to add these 
features to your CTR-41 ? 

• Automatic level playback 

• Ground loop correction 

• Switched motor 

• Monitor (Playback only) or 
Monitor (both Playback 
and Record) 

One way of accomplishing these 
things is to buy a box which con- 
nects to your recorder for around 
$50. The other way is to do it 
yourself with about a dollars worth 
of parts. (Let's see - where did you 
put that soldering iron?) 

The tools you will need are: 

• Soldering iron and solder 
(of course) 

• Phillips screwdriver 

• Wire cutter/stripper 

Parts needed are: 

• Wire (10 feet) 

• 1/4w 68 resistor 

The first step is disassembly. 
Remove all plugs and cables from 
the recorder. Place recorder top 
down with controls facing you (be- 
ing careful not to scratch the top). 
Remove three phillips screws from 
the back case; remove battery cover 
and batteries; remove two phillips 
screws from the battery compart- 
ment; and carefully remove back 
cover and handle. The PC board is 
now in view. Using Fig 1. as a guide, 
make the modifications as detailed 
below. 

MOD 1 - AUTOMATIC LEVEL 
PLAYBACK 
Improvements: 

Improves tape loading 

considerably 

Allows Level I and Level II 
conversions without resetting 
Volume loads all programs, 
Level I or II, at one setting: 



approximately 7Vi (you will 
notice that volume setting is 
no longer critical). 
Modification 
Locate RP switch (switch 
with 18 pins in a row - see 
Fig. 1). 

Short pins 2 and 3 (notice pin 
1 is not used - there is no 
foil leading to it). 

MOD 2 -GROUND LOOP 

Improvements: 
Improves tape loading 
Removes most tape hum 

Modification 

Cut large foil path between 
REMOTE and MIC jack (see 
cut 2 in Fig. 1). 
Solder a small wire from 
point B to A. 

MOD 3 - MOTOR SWITCH 

Eliminates pulling REMOTE 
plug to FAST FORWARD or 
REWIND: just flip tone 
switch (Note: tone always set 
to high). 

Modification 
Cut two PC foils going to 
tone switch, pins 2 and 3. 
Solder a wire from switch pin 

1. to point F. 

Solder a wire from switch pin 

2. to point A. 

MODS 4 and 5 - MONITOR SOUND 
(Choose One) 

To monitor sound from 
recorder PLAYBACK only: 
Solder a V* w 68 resistor 
from points D to C. 
To monitor sound for both 
PLAYBACK and RECORD: 
Solder a Mw 68 resistor 
from points D to E. 
Now reassemble and test! A 

schematic with mods installed is 

shown in Figure 2. 
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ELECTFONICS 

ASSISTANT 



Electronics Assistant is a set of nine circuit 

design programs in one. Written by a 
professional for the serious electronics buff, 
Electronics Assistant will draw schematics and 
help you design active and passive low-, 
band-, and high-pass filters, coils, attenuator 
networks, and three types of impedance- 
matching networks. Features extensive graph- 
ics and a one key selection routine. Circuit 
designers and students will wonder how they 
lived without their Electronics Assistant! 



For 16K Level II 
Price, $9.95 
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YOUR 
TRS-80* 
MICRO- 
COMPUTER! 

Why chug along on an electric 

abacus when you can have the 

power of a berserk Ayatollah! 

These products double the 

horsepower of your computer! 




ELECTRIC 




NewDOS+.with Dir Check, 
Super Zap, Disk Editor As- 
sembler and A DOS that 
really works! $99.95 

Electric Pencil, it starts as 
the best text editor for your 
TRS-80", but that is only 
the beginning! $150.00 

TRS-80 Disk and Other 

Mysteries by Harvard 

Pennington. All you need to 

know to unleash the power 

of Super Zap and Electric 

Pencil. $19.95 



ONLY $269 



FOR ALL 
THREE 

The Software Exchange 

6 So.ithStrert,Box 68,Milford,NH QJ055 60J-67 J-5744 



PERIODICAL 

CROSS 

REFERENC 

by Dave Stambaugh 

YOU DON'T HAVE TO BE A LIBRARIAN 

Every professional or serious hobbyist who 
relies on current literature to update his/ 
her knowledge can benefit from this pro- 
gram. Build a file using any subjects or 
publications you like (18 per file). Allows 
you to add, delete, edit; search by sub- 
ject or publication; list on CRT or line 
printer all or selected entries. SAVE, LOAD with 
both tape and disk versions. 




-^■Catalog and classify your 
library of computer (or other) 
magazines by individual ar- 
ticles under subject, publica- 
tion, date, page, and title 

^List entries by subject or 
publication to CRT or printer 



-^-Maintain data files 

on cassette or disk (2 

versions available) 

^f Edit, delete, add entries 
at anytime 

includes complete 
instructions 



Cassette version: Level II, 16K 
Disk Version: Single disk, 32K 
(Minimum configurations) 



14.95 
19.95 




Uw Software Exchange 

6 SouthStvet, Box 68, Millord,NH 03055 603-673-5144 
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COPY 



by Kalman Bergen 

At last! A program which 
allows you to make backup 
copies of object ("system") 
tapes. No more worrying that 
a dropout will send you 'back to the Shack' for a new 
editor-assembler or chess program. Features include copy, 
verify read, rename, and verify write. No knowledge of machine 
language required, so order yours today! 

For 16K, Level II -$9.95 




THE KEY TO YOUR 
TRS-80*... 

LEARNING LEVELII! 

Written by the author of your Level I User's Manual, LEARNING LEVEL 
II picks right up where the Level I Manual leaves off. It also supplies the 
changes needed to make the Level 1 Manual compatible with your Level II 
TRS-80*. 

LEARNING LEVEL II covers all Level II BASIC beyond Level I, plus much 
more. It shows you how to use the Editor, explains what the many error 
messages are really saying, and leads you thru conversions of Level t pro- 
grams to Level II. 

Dual cassettes, printers, the expansion interface with clock and other 
features are explained in the same easy-to-iearn style that made the Level I 
Manual famous. LEARNING LEVEL It was created specifically for 
your Level II TRS-80*! jp^| C QC Soft cover 

»P I J. J J add $1 .00 for shipping. 

TheSaftware Exchange 

6 South Street, Box 68, Miiford, NH 03055 603-673-5W 

TRS-80 is a registered trademark of Radio Shack and Tandy Corporation. 
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In the beginning there was Level I 

THEN THERE WAS LEVEL II 

NOW - LEVEL III BASIC 

Open the manual and load the cassette. Then get ready to work with the 
most powerful Basic interpreter you've ever had your hands on . . .Level 
III Basic for Radio Shack Computers. It loads right on top of the Level II 
ROM, and in just 5K of space, opens up your capability to new dimen- 
sions. For starters, this new cassette-based interpreter gives you most 
of the commands usually found only in disk BASIC. Plus graphics com- 
mands. Plus Powerful editing commands. Plus long error messages, hex 
and octal constants and conversions, user defined functions and a 
number of commands never before available on either cassette or disk 
interpreters. 

Now do more than 
ever before 

With the most 
powerful cassette 
Basic you can buy 

For the TRS-80 




• EASIER LOADING, FEWER KEYBOARD ERRORS 

• BASIC ACCESS TO RS-232 

• EASIER AND MORE POWERFUL GRAPHICS 

• 10 USR CALLS 

• ERROR MESSAGES 

• TIMES 

• TIMED INKEY 

• RENUMBER 

• ONLY MICROSOFT COULD DO IT. G2 Level III Basic was created by Microsoft, 
the same company that wrote Level II Basic for Radio Shack. And It actually uses Level II as a 
foundation for this enhanced add-on. 

• AVAILABLE NOW FOR ONLY $49.95. You get the power that might otherwise 
cost you hundreds of dollars In additional equipment for only S49.9S. Price Includes the Users 
Manual, a Quick Reference Card, and a preprogrammed cassette tape. 




The Software Exchange 

6 SouthStrcet, Box 68, Milford, NH 03055 603-673-5144 
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PO Box 68 
Milford, NH 03055 

"your BASIC software magazine" 

Rush me the next 12 issues of SoftSide. 



□ USA bulk. $18 1yr. D$32-2yrs. DCANADA/MEXICO $25 1 yr. 

□ USA first class $25 1 yr. DOVERSEAS airmail $30 1 yr. 

□ APO/OVERSEAS surface $25 1 yr. Telephone your charge.card order! Call 



^Qj) Credit Card J-{£j 



our Subscription office Monday through 
Friday 9:30 to 5:30 (Eastern time) at 
603-673-5144 



Exp. Date_ 
Signature- 
Name 

Address — 
City 



Interbank # M/Conly) 



- State - 



Zip- 



Please remit in US funds ONLY 



Ready to get serious) SUBSCRIBE TO PROG/80 the magazine 
dedicated to serious programmers., beginners to professionals 



SUBSCRIPTION RATES - 6 issues per year 



USA 
Bulk mail - $15.00 
First Class Mail - $21 .00 
Overseas airmail - $27.00 



n dieck/MoriBy J 

gligNATURE v . "^1 

ACCOUNT #_! V "' ■ • 

EXFv DATE _ , l", 
NAMF hi - ill' 1 , 



Canada 
Mexico 
APO/FPO 
Overseas surf 



INTER 




i Master Charge - VISA 



ADDRESS . 



CITY_ 



STATE, 



ZIP 



Telephone orders accepted for Master Charge or VISA accounts. Call Monday through 
Friday , 9:30 to 5:30 EST at 603-673-5144 

PO BOX 68, MILFORD, NH 03055 




The Software Exchange 

hScxithSlnvt.BoxbB.Millord.NIW.lO.W (H).i-<>7.t-^144 

ELECTRIC PEft 

Effortless typing is fere! 

The Electric Pencil by Michael Shrayer 
is a true word-processing program for 
the TRS-80. Enter your manuscript, 
and let your computer do the work. 
Editing? Just position the cursor with the 
arrow keys . . . one-key commands let you 
change, delete, or insert. Fully 
adjustable margins, left/right justifica- 
tion, variable spacing, page headings, 
and much more! Save and recall your text 
with tapeor diskfiles. Typing everythin 
from letters to reports is fast and Level II 16K 
incredibly easy using The Disk version 
Electric Pencil . (comes on i ape ) 




tape - 
$150. 



$100.00 
00 
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